kaban

摘要： PChar是以null结尾的字符型指针，Pointer是无类型的指针。string可以兼容pchar，如：varp:pchar;s:string;begins:='xyz';p:=s;showmessage(p);end;或者：varp:pchar;s:string;begins:='xyz';p:=pchar(s);//用pchar强类型转化showmessage(p);end;如果用messagebox函数的话，想要输出一串字符，就需要用Pchar强制转换 阅读全文

摘要： for I := 1 to NUM_OF_SEARCHERS do FCoordinator.ProgressBars[I] := TProgressBar(FindComponent(Format('ProgressBar%d', [I])));当主窗体上有多个ProgressBar组件：ProgressBar0,ProgressBar1..。可以通过FindComponent获取组件 阅读全文

摘要： 1、TfileListBox对象，添加新文件名后，使光标自动选中该文件名！代码如下： FileLb.Update; Num := SendMessage(FileLb.Handle, LB_FINDSTRING, -1, Cardinal(sNewName));//sNewName为新文件名，Num返回该文件名在FileLb中的索引值； FileLb.ItemIndex := Num; filelb.Items[filelb.ItemIndex]; 阅读全文

摘要： 希望自己能够经营好博客，虽然可能大部分好的内容不是自己原创的，但也希望能够将自己学习的过程中找到的优秀资源集结起来，与大家一同分享！！！ 阅读全文