打印所有edit.text for i := 0 to componentCount - 1 do begin if Components[i] is TEdit then Canvas.TextOut(x,y * (i + 1),TEdit(Components[i].text)); end;self.print;
var i:integer; x:integer; y:integer; begin for i := 0 to componentCount - 1 do begin if Components[i] is TEdit then Canvas.TextOut(x,y * (i + 1),TEdit(Components[i].text)); 这行提示[Error] Unit1.pas(35): Undeclared identifier: 'text' [Fatal Error] Project1.dpr(6): Could not compile used unit 'Unit1.pas' end; self.print; 这行好像也有错.能否给我个注示啊,谢谢.
for i := 0 to componentCount - 1 do begin
if Components[i] is TEdit then
Canvas.TextOut(x,y * (i + 1),TEdit(Components[i].text));
end;self.print;
i:integer;
x:integer;
y:integer;
begin
for i := 0 to componentCount - 1 do begin
if Components[i] is TEdit then
Canvas.TextOut(x,y * (i + 1),TEdit(Components[i].text)); 这行提示[Error] Unit1.pas(35): Undeclared identifier: 'text' [Fatal Error] Project1.dpr(6): Could not compile used unit 'Unit1.pas'
end;
self.print; 这行好像也有错.能否给我个注示啊,谢谢.