VB 是 On error resume next DELPHI是哪一句？ VB 是 On error Goto AA DELPHI是哪一句？

Error reading WSCustomReport.Frame.Color:Property Frame does not exist.Ignore the error and continue? Note:ignoring the error may cause components to be deleted or property values to be lost.

老提示这个错误 [Fatal Error] File not found: 'PrnDbgEh.pas' 但就是找不到这个"'PrnDbgEh.pas'"文件

with AdoQuery1 do begin SQL.Clear; SQL.Add('insert into wxd_tab(dh,p,khdz,fwxs,khdh) values(:dh,:p,:khdz,:fwxs,:khdh)'); //,:djy dh:=DanHao(); parameters.ParamByName('dh').Value:=dh; parameters.ParamByName('p').value:=false; parameters.ParamByName('khDz'...

用ADOQuery1连接的数据库data,然后把数据库中的数据用TChart图形显示出来,因为数据库里的数据会经常改变,可是发现TChart里的图形不会跟着立即改变,只有把程序停止了再运行时图形才会改变,请问各位高手:怎样才能让TChart里的图形也跟着数据库里数据的改变而改变呢?谢谢!!

例如 ：procedure TForm.edit1 如何取得TForm.edit1这个字符串

在form1.edit1.text中输入手机号13****，点击form1.button1，这时就会把13****的数据调出来并且用form1.ADOQuery1连接的数据库把数据显示出来，我想让它显示完数据以后接着把这些数据用TChart画成图形，于是我用的ADOQuery1AfterPost事件来显示图形，代码如下： procedure TForm1.ADOQuery1AfterPost(DataSet: TDataSet); begin form2.show; end; procedure TForm2.FormCreate(Sender: TObject); begin...

如果用16个，写代码会比较简单，但我害怕线程太多，系统容易崩溃!如果用一个的话，串口名要不停地改来改去的，还要不停地开启和关闭串口，好麻烦呀! 不知大家遇到类似情况都是怎么做的呢？谢谢了先!

要用FlashGet能下载的，刚才用了BT都下载不成功。 刚才找的好辛苦呀，一般都是买广告的。 告诉我地址马上结贴

哪里有sftp控件呢.急呀!

var Test : Array of WideString; op:OperateResult; begin SetLength(Test, 2); Test[1]:='sdf '; Test[2]:='asdf'; op:=tree('a','abc',Test,'sdf');// end; 说明：op为自定义对象类型，现在用delphi调用java写的webservice的方法如下： java写的方法： OperateResult tree(String name,St...

result:=false; if edit1.Text=''and edit2.Text=''and edit3.Text='' and edit4.Text=''and edit5.Text=''and edit6.Text=''and edit7.Text=''and edit8.Text=''and edit9.Text=''and edit10.Text=''and edit11.Te...

是不是 Application.Run; { ... DispatchMessage(Msg); } 后,message 既给了Application.wndproc 也给了FObjectInstance := Classes.MakeObjectInstance(MainWndProc); 消息处理函数

怎么才能把窗体右上角的最大化按钮设置为不可用。

怎样为Shape 添加 Handle ,因此我想切割三角形并且绘制成按钮形式(做七巧板用) , 但切割需要Handle ,还有做成按钮形式,有浮起的效果, 请高手指点。

在delphi的TForm内嵌外部程序，即打开程序界面，外部程序的界面就显示程序的TForm中，请教各位高手!谢谢~

function TApplication.ProcessMessage(var Msg: TMsg): Boolean; var Handled: Boolean; begin Result := False; if PeekMessage(Msg, 0, 0, 0, PM_REMOVE) then begin Result := True; if Msg.Message <> WM_QUIT then begin Handled := False; if Assigned(FOnMessage) then FOnMessage(Msg, Handled);...

比如我创建了6个类分别是： A1，A2，A3，A4，A5，A，A是前面A1..5的父类。 在程序中我的子类A1..A5都有相同的几个过程或函数名称，但是实现的代码不同。我在调用的时候是否可以将子类赋值给A 比如：A：＝A1 然后统一用A来调用这些函数，A父类中也有这些函数! 请高手帮忙指导!! ××××××××××××××××××××××××...

比如我创建了6个类分别是： A1，A2，A3，A4，A5，A，A是前面A1..5的父类。 在程序中我的子类A1..A5都有相同的几个过程或函数名称，但是实现的代码不同。我在调用的时候是否可以将子类赋值给A 比如：A：＝A1 然后统一用A来调用这些函数，A父类中也有这些函数! 请高手帮忙指导!!

如题,我在dbgrid中的某一列在记录集中是用数字标识状态,但我想在dbgrid中用中文根据其数目进行相应表示.而不改变记录集中的数据,应怎么办?

如题!

如题，望高手赐教， 因为我在设计软件在线更新时需要删除自身或者备份自身

开始程序好好的，我不小心不知道修改了什么？ 竟然出现错误了，我找不到错误，大家帮个忙呀？？这究竟是怎么回事？ 错误提示： [Fatal Error] Unit10.pas(11): Internal error: SY576 谢谢大家呀!!

我尝试过很多种办法,用Panel切割,但在Panel用Canvas.LineTo绘制线条并 移动 时线条会自动消失,我也试过用TGraphicControl新建组件绘制图形,但没有Handle ,不能切割,请高指点指点

1窗体创建的时候，窗体上的控件是什么时候建的啊？ 2控件算不算窗体啊，要是算的话，他也应该注册窗体类并且创建的啊，这又是怎么完成的

在ListView中添加纪录的时候多了就会出现滚动条，如何判断滚动条所处的位置，最底层的让纪录继续添加，如果滚动条不是处于最下面，就是浏览数据，不添加，我知道如果控制滚动条位于最下面，但如果判断它处的位置，也就是说你移动滚动条的时候触发了什么事件，或者是可以从什么消息中截获滚动条位置的参数？

就是用adoconnection和adotable让dbcross显示出数据来就可以了啊～

动态创建的菜单项，如果几个菜单项共用一个onClick过程，如何判断当前点击的是哪一个项？ 如何获取其索引值?（myzhz1978）

在DLL中怎么不自动调用析构函数? 如我的程序是这样写的: untChargeForSrv use ... , untChargeMsgServer; ... initialization gCsForCall := TCriticalSection.Create; ChargeMsgServer :=TChargeMsgServer.Create; finalization //ChargeMsgServer.Close; //在这里调用 Close 会出错. 但结束DLL是不调用Destroy FreeAndNil(gCsForCall); //在这里执行Close也...

我已做好页面 但是要加一页 加pagecontrol 把做好的控件加到 tabsheet 里 ？？？

在主窗体创建时，根据登陆用户权限；动态创建连接窗体的按钮； 现在功能实现了；但出现一个小问题；就是tfcoutlooklist中的按钮的text字体怎么修改都是绿色的；各位兄弟帮忙看看哪里出问题了。 procedure TForm1.Button2Click(Sender: TObject); var Afcoutlookpage:TFcoutlookpage; afcoutlooklistItem: TfcOutLookListItem; begin AfcOutLookPage := OutLookMain.OutlookItems.Add; with AfcOutLook...

我想在点击一个窗体上的按钮后，进入两一个窗体，这个窗体上有一个PageControl，我想在进入这个窗体时候，PageControl1也是我想要的这个页面。。 比如，我在PageControl1上面有好多的页面，当我在另一个窗体点击进入这个窗体后，PageControl1随即显示的是第2个页面，而不是第一，怎么样作到啊？ 我用PageControl1.Pages[2].Show;对不对啊？ 在线等啊，急啊。。。。。 谢谢了。。。

我用httpget控件作成activex控件，用来下载更新的内容，以前一直好用，但现在发现在IE7上如果下载文件是中文的就不行，但在ie6上就可以，望各各位明白的大哥给指导一下，怀疑是ie7的问题，但根据网上搜寻的办法，如取调UTF-8的选项等都不行，痛苦啊。。。。。。。

有關FASTREPORT列印及匯出的中文問題! 各位先進, 有二事請教: 1.FASTREPORT是否不支援中文? 在DELPHI設計報表的時候, 報表內的預設字型是ARIAL, 擺上幾個中文字後預覽是正常的, 但轉至PDF變亂碼了! 2.把預設字型改為新細明體後, 中文字會被截斷! 假設有四個中文字, 會被截成剩兩個字! 必需在字尾加上幾個空白才會正常顯示, 而且空白數要依中文字數來決定, 字數愈多, 就要愈多空白! 我試過3.X版和4.X版都一樣, 不知各位是如何解決的? 我在安裝元件的時候, 有將 RES\Chinese 或 Taiwan 底下的 - frxrcClass....

问题如题! 现在是用手工进行操作,所以比较麻烦! 要怎么设置,请不吝赐教! 谢谢!

我用ExportGrid4ToEXCEL将grid导出为execl，可是最多只能导出48行，为什么？ D7＋ExpressQuantumGrid 4.2.1。

怎么样获取某一列所有字段的数值的总合啊？

利用Tstringlist删除文件中有‘ 4 1’，‘RINEX FILE SPLICE; other post-header comments skipped COMMENT’的行，空白处为空格符。 代码如下： procedure TForm1.Button2Click(Sender: TObject); var s:tstrings; num,pos1,pos2:integer; begin s:=tstringlist.create; s.loadfromfile('c:\usno.06o'); for num:=0 to s.count-1 do...

请ahjoe(强哥)进来～～～

请ahjoe(强哥)进来～～～

在用delphi程序向word文档输出内容时，想实现页面的分栏，请教高手如何实现分栏功能？

我用TCHART做曲线图,数据是一分钟一个,一个曲线上显示24个小时即1440个点,横坐标要设置成整点时间,象1:00 2:00 要24个点,怎么调也调不到哦,哪位2兄弟指点一下!

我先前曾修改过TEDIT,使其数据右对齐,可是每次我都要输入一次,然后跳到其他文本框后,再回来之后才可以正常有对齐(开始运行初期都是默认对齐方式).还有我在设计登录窗口的时候,想开始'登录'按钮不可用,每次我都要输入一次,还是不可用,再输入一次才正常显示,这是怎么回事!

我现在生成的EXE在我的机器上可以运行，但是到别人的机器上，如果是2000，XP的话打开以后什么反应都没有，在98下面，就出来非法程序，，，怎么回事啊。我搞了一天了，都没有弄好。!

我在主窗体上建立一个pagecontrol,增加两二tabsheet,有没有办法选择不同的tabsheet把另外两个窗体分别加载进来呢? 有点像网页中的框加嵌入, 快点指点迷津哦

偶想动态使用语句建立一列显示风格为memo的字段! 使用的请语句如下 var VBlobItem: TdxInspectorBlobRow; begin VBlobItem := TdxInspectorBlobRow(dxDBInspector.Rows[1]); VBlobItem.BlobKind := bkauto; end; 可是不成功,显示风格不是memo类型的! 高手帮忙!

比如在detailband1里面放一个QRDBText,连接到字段k 如果k=1,那么就把QRDBText的字体属性改变为斜体， 否则按原先设定的字体显示。 请高手们不吝赐教!

通过语句将一个视图邦定到dbgrideh，试图中有一个列是checkbox，问题是现在在dbgrideh中改变某一行checkbox的状态，再更改第其他行时，上次更改的又变回原来的状态，好像是没有更新dataset中的值，手动更新, self.dgeinfolist.DataSource.DataSet.Edit; self.dgeinfolist.DataSource.DataSet.FieldByName('ty').Value := 1; self.dgeinfolist.DataSource.DataSet.Post; 说dataset不是更新状态!! 求...

书上的一个例子,但无法运行,郁闷!拜托各位给看看 unit main; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, ExtCtrls; type TMainForm = class(TForm) Panel1: TPanel; PageControl1: TPageControl; TabSheet1: TTabSheet; TabSheet2: TTabSheet; TabSheet3: TTab...

Image1.Canvas.Draw(1,1,bitmap); 在按钮时间可以画了 我想在程序运行就画，怎么画？我写在paint不行，create和active都不行