Einzelnen Beitrag anzeigen

OrNEC

Registriert seit: 6. Nov 2009
493 Beiträge
 
FreePascal / Lazarus
 
#1

Procedure aus Form1 im Form3 nutzen?

  Alt 25. Aug 2010, 18:22
Delphi-Version: 2005
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.
  Mit Zitat antworten Zitat