我的语法是这样的procedureTForm1.A1Click(Sender:TObject);begin ShellAbout(Application.MainForm.Handle, '此处写您的软件名称'， 'Copyright(c)2001-2002'#13'http://www.sgjz.cn', Application

我的工程里有很多窗体，我想查询某个关键字在哪个窗体单元代码中，怎么写代码我的程序在运行过程偶尔出错，提示‘Adoquery0('jfms')’没找到我想查看这个jfms关键字出现在哪个窗体的单元代码中

C/C++codestructtagOsdHelper{tagOsdHelper(){m_nw=0;m_nh=0;m_hBmp=NULL;m_hOldBmp=NULL;m_pDibBits=NULL;m_pOldFont=NULL;}~

用combobox可以选择一个要入库的清单，然后把清单里面的商品编号字段的值复制到仓位管理中的商品编号字段中新手不太会，求高手指教呀。（入库清单中的商品数量小于仓位数量）

比如：vari:integer;j,k:array[1..100]ofreal;beginfori:=1to100dobeginj[i]:=i/10;k[i]:=sin(j[i]);end;fori:=1to100dobeginseries1.AddXY(j[i],k[i]，format（‘%2.2f’,[j[i]]）;end;这段程序是画个正弦，横坐

var PHandle:THandle; nSize:DWORD=4; nSize2:DWORD=16; lpNumberOfBytesRead:DWORD; FirstADD:integer; FirstADDZ:Pinteger;ReadProcessMemory(PHandle,Pinteger(Fir

每次都要手动写代码来封装private里F开头那些字段为published的属性。麻烦有没有像VS一样的那种菜单一点就自动封装的功能？

delphi中串口传输可以实现收到一个字节执行一次中断事件吗？有没有做过类似的同胞们请教大家

Label组件字体颜色我设置成红色了Label.font.color这里设置成红色了不是用代码而是直接在组件中选的为什么程序运行后就变为黑色了呢设置不成功啊用代码设置的话就会成功想知道原因

Delphi(Pascal)codefunctionDSStartService(port:Word):Integer;stdcall;externalgprsdllname'DSStartService';functionDSSendData(modemid:Cardinal;len:Word;buf:string):Integer;stdcall;externalgp