摘要: Delphi中动态加载Image控件图片的方法作者:海豚王子procedure TForm1.Button1Click(Sender: TObject);var jpg: TJPEGImage; // 要use Jpeg单元begin // 显示jpg大图片的方式 jpg := TJPEGImage.Create; jpg.LoadFromFile(getcurrentdir() + '\pic.jpg'); Image1.Picture.Bitmap.Assign(jpg); // 因为 img 控件是基于bmp的 jpg.Free;end;procedure TForm1. 阅读全文
posted @ 2013-05-12 12:16 麦麦提敏 阅读(1636) 评论(0) 推荐(0)
摘要: TClientDataSet的使用技巧本文从以下几个方面阐述TClientDataSet的使用,希望对你有所帮助.1.动态索引procedure TForm1.DBGrid1TitleClick(Column: TColumn);beginif (not column.Field is Tblobfield) then//Tblobfield不能索引,二进制ClientDataSet1.IndexFieldNames:=column.Field.FieldName;end;2.多层结构中主从表的实现设主表ClientDataSet1.packetrecord为-1,所有记录设从表ClientD 阅读全文
posted @ 2013-05-12 12:13 麦麦提敏 阅读(500) 评论(0) 推荐(0)
摘要: SQL触发器作者:海豚王子一、创建一个简单的触发器触发器是一种特殊的存储过程,类似于事件函数,SQL Server? 允许为 INSERT、UPDATE、DELETE 创建触发器,即当在表中插入、更新、删除记录时,触发一个或一系列 T-SQL语句。触发器可以在查询分析器里创建,也可以在表名上点右键->“所有任务”->“管理触发器”来创建,不过都是要写 T-SQL 语句的,只是在查询分析器里要先确定当前操作的数据库。创建触发器用CREATE TRIGGERCREATE TRIGGER 触发器名称ON 表名FOR INSERT、UPDATE 或 DELETEAST-SQL 语句注意:触 阅读全文
posted @ 2013-05-12 12:07 麦麦提敏 阅读(239) 评论(0) 推荐(0)
摘要: Delphi编程防止界面卡死的方法作者:海豚王子1.循环里面防止界面卡死的方法可以使用Application.ProcessMessages; 例如下列方法: var n:Integer;begin for n := 0 to 10000 dobegin Edit1.Text := IntToStr(n); end; end; 在程序里执行的时候,界面肯定会卡死的,但如何防止界面出现卡的情况呢,加入Application.ProcessMessages即可,修改后的代码为: var n:Integer;begin for n := 0 to 10000 dobegin Application. 阅读全文
posted @ 2013-05-12 12:03 麦麦提敏 阅读(638) 评论(0) 推荐(0)
摘要: CxGrid用法使用cxGrid有一些时间了,在这里总结一下使用cxGrid的一些方法,希望给刚开始接触cxGrid的人一些帮助。1.简单介绍:cxGrid右下方的cxGrid1Level1是表示Grid表的层,cxGrid可以有多层,这相当于集合了PageControl的功能,而cxGrid1Level1右边的cxGrid1DBTableView1相当DBGrid一样。右击cxGrid1可以添加cxGrid1Level2,右击cxGrid1Level2,可以选择Create View , Add level 或者Delete Level。Add level可以增加子Level,Create 阅读全文
posted @ 2013-05-11 13:28 麦麦提敏 阅读(876) 评论(0) 推荐(0)
摘要: FastReport几个使用技巧1.FastReport中如何共用TFrxreport及TfrxDBDataSet一个程序中,不管多么大的程序,只要打印或预览时是模式的,则完全可以共用一个TFrxreport变量及几个TfrxDBDataSet。只不过,要注意完成一个报表程序的步骤,主要是下面几步1)清除报表,得到一个全新的报表内容。 Frxreport1.clear。2)设置要使用的TfrxDBDataSet的别名,如果不需要可以省略这一步,但一般最好不同的报表用不同的别名。 注意这一步要在加载报表文件之前,因为一般设计报表文件时已经包含了别名信息。 frxDBDataSet1.Use... 阅读全文
posted @ 2013-05-06 18:23 麦麦提敏 阅读(1540) 评论(0) 推荐(0)
摘要: cxGrid使用技巧http://www.cnblogs.com/colincode/category/257535.html 阅读全文
posted @ 2013-05-06 17:17 麦麦提敏 阅读(167) 评论(0) 推荐(0)
摘要: FastReport经验1.FastReport中如果访问报表中的对象?可以使用FindObject方法。TfrxMemoView(frxReport1.FindObject(’memo1′)).Text:=’FastReport’;2.FastReport中如何使用上下标?设置frxmemoview.AllowHTMLTags := True;在Text输入如下上标:mm<sup>2</sup>下表:k<sub>6</sub>举一反三,你还可以使用其他HTML标记。3.FastReport中如何打印总页数?设置两次报表后加入引号内内容 “第[P 阅读全文
posted @ 2013-05-06 17:13 麦麦提敏 阅读(396) 评论(0) 推荐(0)
摘要: FastReport报表控件使用技巧总结1.FastReport中如何访问报表中的对象?可以使用FindObject方法。TfrxMemoView(frxReport1.FindObject('memo1')).Text:='FastReport';2.FastReport中如何使用上下标?设置frxmemoview.AllowHTMLTags:= True;在Text输入如下上标:mm<sup>2</sup>下表:k<sub>6</sub>举一反三,你还可以使用其他HTML标记。3.FastReport中如何打印 阅读全文
posted @ 2013-05-06 14:46 麦麦提敏 阅读(764) 评论(0) 推荐(0)
摘要: Fastreport使用经验(转)新版本1.FastReport中如果访问报表中的对象?可以使用FindObject方法。TfrxMemoView(frxReport1.FindObject(’memo1′)).Text:=’FastReport’;2.FastReport中如何使用上下标?设置frxmemoview.AllowHTMLTags := True;在Text输入如下上标:mm<sup>2</sup>下表:k<sub>6</sub>举一反三,你还可以使用其他HTML标记。3.FastReport中如何打印总页数?设置两次报表后加入引号 阅读全文
posted @ 2013-05-06 14:03 麦麦提敏 阅读(555) 评论(0) 推荐(0)