delphi7中，如何添加控件？

Posted 2023-03-28

基本安装
1、对于单个控件，Componet-->install component..-->PAS或DCU文件-->install;
2、对于带*.dpk文件的控件包，File-->Open(下拉列表框中选*.dpk)-->install即可；
3、对于带*.bpl文件的控件包，Install Packages-->Add-->bpl文件名即可；
4、如果以上Install按钮为失效的话，试试Compile按钮；
5、是run time lib则在option下的packages下的runtimepackes加之。
如果编译时提示文件找不到的话，一般是控件的安装目录不在Delphi的Lib目录中，有两种方法可以解决：
1、反安装的源文件拷入到Delphi的Lib目录下；
2、或者Tools-->Environment Options中把控件源代码路径加入到Delphi的Lib目录中即可。
注意：所安装的控件是否与你所用的Delphi版本相适应。
这是我查到的资料，但是还是不太懂。在Componet-->install component..-->之后具体的操作步骤，可以给详细说下。 谢谢

如果控件的代码只在一个.pas文件里，首先要把.pas文件打进包bpl里，再Install 。 参考技术A 在Componet-->install component..-->之后保存关闭就OK

Delphi中StringGrid控件如何添加数据？

不用读数据库..自己添加数据..

参考技术A procedure TForm1.StringGrid1Click(Sender: TObject);
var
i,j:Integer;
begin
StringGrid1.ColCount := 128;
StringGrid1.RowCount := 128;
for i:= 34 to StringGrid1.ColCount do
begin
StringGrid1.Cells[i-33,0]:= IntToStr(i-33);
StringGrid1.ColWidths[i-33] := StringGrid1.Canvas.TextWidth(' 宽 ')
end;

for j:= 34 to StringGrid1.RowCount do
begin
StringGrid1.Cells[0,j-33]:= IntToStr(j-33);
end;

for j:= 34 to StringGrid1.RowCount do
for i:= 34 to StringGrid1.ColCount do
StringGrid1.Cells[i-33,j-33]:= Chr(j+127)+ chr(i+127);
end;

单击StringGrid时触发的事件。 参考技术B var
i,j:integer; //i为列 ,j为行
begin
for i:=1 to 4 do
begin
for j:=1 to 4 do
begin
stringgrid1.Cells[i,j]:=inttostr(i)+''''+inttostr(j);
end;
end;
end;