求对 结构体 固定压缩率 的算法
大家好，我定义一个结构体 TMyrecord=packedrecord mhByte1:Byte; mhByte2:Byte; mhByte3:Byte; mhArryData:array[0..1,0..256-1]ofByte; mhArryOtherData:array[
作者: wangzh 发布时间: 10-01
求助，一个PHP函数转换成delphi函数。
functionencode($input){ $FlashFXP_Key="yA36zA48dEhfrvghGRg57h5UlDv3"; if($input=="")return""; $key=rand(1,255); //$key=15;//调试用的echo"动态Key".$key."<br>";
作者: ymenking 发布时间: 09-30
delphi 问题，很简单的！~~
我想问一下，edit为什么里面的autosize不管用呢？文字上下是自动的高度，但是文字长度不能自动，怎么做才能让长度合适而且，edit屏幕居中呢？
作者: qq1102934754 发布时间: 10-01
求助：hook CreateTextServices
看了“浅谈APIHOOK技术”，能够hook住大部分API函数，如textout等。但是尝试hookCreateTextServices始终不成功。发现RepointFunction(@OldCreateTextServices,@MyCreateTextServices);返回值始终是零。有做过的大侠吗？能否赐教一二？
作者: fisher_older 发布时间: 10-01
高手看看 哪里错了 为什么会字段名找不到。
procedureTForm5.onselect(Sender:TObject);beginwithadoquery3dobeginadoquery3.close;adoquery3.sql.Clear;adoquery3.Sql.Add(Format('select*from%s',[ComboBox8.Text]));adoquery3.sql.Clear;ado
作者: xiaobaigezhinu 发布时间: 10-01
在delphi中怎么给一个数组循环覆盖赋值呀？
在delphi中怎么给一个数组循环覆盖赋值呀？就是当给一个数组赋值满了之后，再从头开始赋值怎么实现呀，据说在delphi中循环变量不能改变呢，那该怎么办呀
作者: ningyanhong 发布时间: 10-01