摘要：DELPHI打开窗体时，提示父类文件找不到 这两天，使用工程中突然在打开窗体的时候出错，大概的意思就是找不开父类文件(因为我是从其他窗体继承过来的)。但如果先打开父类窗体 又不会出错。搞了很久，没有搞定。系统也重装，还是不行。最后看到下面这遍文章才解决。 我的方法是，把父类窗体全部从工程中移除，再从新添加进来就OK了。 有的时候，我们会碰到一些比较烦人的东西，打开某个继承的窗体，会提示说基类窗体找不到，并且找不开这个窗体，必须先打开基类窗体，然后再打开此窗体，才可以进行设计模式。其实出现这种情况的原因，就是因为工程dpr文件中，没有添加此基类的Form文件造成的，多是由于系统移植造成的，你也可 阅读全文

摘要：unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Db, ADODB, comobj; type TForm1 = class(TForm) ADO: TADOConnection; ADOQuery1: TADOQuery; Button2: TButton; Button3: TButton;... 阅读全文

摘要：function Format(const Format: string; const Args: array of const): string; $[SysUtils.pas 功能：返回按指定方式格式化一个数组常量的字符形式 说明 这个函数是Delphi中用得最多的函数，现在就列举几个例子以得到直观的理解 "%" [索引 ":"] ["-"] [宽度] ["." 摘要] 类型 它是以"%"开始,而以"类型"结束，"类型"表示一个具体的类型。中间是用来格 阅读全文

摘要：//自绘POPUPMENU，使其强制向上弹出 TrackPopupMenu(Pmu_ReportList.Items.Handle, TPM_BOTTOMALIGN, sPoint.X-cPoint.X,sPoint.Y-cPoint.Y, 0, PopupList.Window, nil); 阅读全文

摘要：Q: 如何打开一个应用程序？ ShellExecute(this-> m_hWnd, "open ", "calc.exe ", " ", " ", SW_SHOW ); 或 ShellExecute(this-> m_hWnd, "open ", "notepad.exe ", "c:/MyLog.log ", " ",SW_SHOW ); Q: 如何打开一个同系统程序相关连的文档？ ShellExecute(this-& 阅读全文

摘要：大概有这些方法可以获得文件大小 FileSizeByName（需要引用IdGlobal单元） GetFileSize FileSize（不能获得正在使用的文件大小） FileSeek TFileStream.Size 下面是使用例子 1。FileSizeByName（需要引用IdGlobal单元） begin if OpenDialog1.Execute then begin ShowMessage(IntToStr(FileSizeByName(OpenDialog1.Filename))); end; 2。GetFileSize var FileHandle:integer; begin 阅读全文