代码搜索结果
找到约 10,000 项符合
Screen 的代码
main.cpp
//////////////////////////////////////////////////////////////////////////////
// main.cpp //
//////////////////////////////////////////
showform.h
bool OpenForm(TForm * WForm)
{
int i;
bool FormExist;
if(WForm==NULL) return false;
FormExist = false;
for(i=0;iFormCount;i++)
if(Screen->Forms[i]->ClassType()==WForm->Clas
系统主程序.prg
hide window screen
set path to D:\通用商品销售管理系统\forms\
do form "splash表单.scx"
set path to D:\通用商品销售管理系统\progs\
do "系统设置.prg"
read events
close all
quit
系统主程序.bak
hide window screen
set path to D:\通用商品销售管理系统\forms\
do form "splash表单.scx"
&&set path to D:\通用商品销售管理系统\progs\
&&do "系统设置.prg"
&&read events
close all
quit
appclasses.cpp
#include "appclasses.h"
#include "AEEStdLib.h"
//--------------------------------------------------------------------------
// Writer class constructor
//----------------------------------------
main.bak
set talk off &&关闭对话模式
set safe off
set stat off
set dele on &&不处理已删除的记录
set cent on
set date to ansi
set sysmenu off
set status bar off
close all
deactivate window "项目管理器" &&关闭项目管
frmnewsbar.frm
VERSION 5.00
Begin VB.Form frmNewsBar
BackColor = &H00000080&
BorderStyle = 0 'None
Caption = "Form1"
ClientHeight = 315
ClientLeft = 0
C
frmsplash.frm
VERSION 5.00
Begin VB.Form frmSplash
BackColor = &H00808080&
BorderStyle = 3 'Fixed Dialog
ClientHeight = 3150
ClientLeft = 255
ClientTop = 141
unitfrmmain.pas
unit unitFrmMain;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
ScrollBox1: TScrollBox;
main.prg
do form 利用ado访问加密的access数据库
_screen.visible=.f.
_screen.top=-1024
read events