Hallo,
hab folgendes Problem: ich hab eine Procedure im Form1 die ich im Form3 aufrufen will, aber es gelingt mir irgendwie nicht, wer kann mir das helfen? Hier ist der Code:
Delphi-Quellcode:
type
TForm1 = class(TForm)
StringGrid1: TStringGrid;
...
procedure ZeileBlenden(sg: TStringgrid; Zeile: integer);
begin
if (Zeile < sg.rowcount) and (Zeile >= 0)
then begin
if sg.rowheights[Zeile] <= abs(sg.GridlineWidth) then
sg.rowheights[Zeile] := sg.DefaultRowHeight
else sg.rowheights[Zeile] := -sg.GridlineWidth;
end;
end;
ZeileBlenden(StringGrid1, Stringgrid1.rowcount-1);
Um die procedure ZeileBlenden im Form3 aufzurufen muss ich wohl die StringGrid1 da irgedwie deklarieren, oder? Die Procedure selber hab ich auch nach Form3 übertragen.