摘要:摘 要:由窗口句柄获得对应可执行文件名
关键字:句柄
类 别:系统控制
下面这个函数将根据窗口句柄参数返回相应程序的可执行文件名和路径。
function getappname(hwindow: hwnd): string;
var
h : hmodule;
begin
setlength(result, 100);
h:=getclasslong(hwindow, gc......
摘要:若希望在tnotebook或tpagecontrol组件的所有页面上显示某些组件(例如浏览数据库的列表框)时,不需要在在每个页面上重复设置这些组件,只需要首先建立它们,然后再添加tnotebook或tpagecontrol控件,调整它们的大小和位置,用鼠标右键单击tnotebook或tpagecontrol组件,单击弹出菜单中的“send to back”属性,这时最先添加的控件就显示在tnote......
Delphi编程中的“流”上一页 ...
大于或者等于零.
sofromcurrent:offset为移动后指针与当前指针的相对位置. 【程序编程相关:
Delphi与DirectShow&DS】 【推荐阅读:
Dbgrid 中表字段所在的列序号
】
sofromend:offset为移动后指针距离数据开始的位置.此时offset必须 【扩展信息:
TWebBrowser的常见属性和方法
】
小于或者等于零.
该方法返回值为移动后指针的位置.
4.setsize:此方法实现改变数据的大小.函数原形为:
function setsize(newsize:longint);virtual;
另外,tstream类中还定义了几个静态方法:
1.readbuffer:此方法的作用是从流中当前位置读取数据.函数原形为:
procedure readbuffer(var buffer;count:longint);
参数的定义跟上面的read相同.注意:当读取的数据字节数与需要读取的字节
数不相同时,将产生ereaderror异常.
2.writebuffer:此方法的作用是在当前位置向流写入数据.函数原形为:
procedure writebuffer(var buffer;count:longint);
参数的定义跟上面的write相同.注意:当写入的数据字节数与需要写入的字节
数不相同时,将产生ewriteerror异常.
3.copyfrom:此方法的作用是从其它流中拷贝数据流.函数原形为:
function copyfrom(source:tstream;count:longint):longint;
参数source为提供数据的流,count为拷贝的数据字节数.当count大于0时,
copyfrom从source参数的当前位置拷贝count个字节的数据;当count等于0时,
copyfrom设置source参数的position属性为0,然后拷贝source的所有数据;
tstream还有其它派生类,其中最常用的是tfilestream类.使用tfilestream
类来存取文件,首先要建立一个实例.声明如下:
constructor create(const filename:string;mode:word);
filename为文件名(包括路径),参数mode为打开文件的方式,它包括文件的打
开模式与共享模式,其可能的取值与意义如下:
打开模式: ...
下一页 摘要:var
ihandlecount: integer;
plist: array[1..nhkl_list] of hkl;
szimename: array[0..254] of char;
i: integer;
sfound: string;
begin
lstcomposition.items.clear;
ihandlecount := getkeyboard......