Einzelnen Beitrag anzeigen

Julzn

Registriert seit: 22. Jan 2006
Ort: Pfaffenhofen a.d. Glonn
27 Beiträge
 
#1

funktion in andrer unit aufrufen geht nicht

  Alt 6. Feb 2006, 21:11
tag leutz,

also ich hab 2 units. in der 1. is die funktion deklariert:

Delphi-Quellcode:
function CreateFeld(i:integer):Boolean;
.
.
.
function TForm1.CreateFeld(i:integer):Boolean;
begin
  {spielt keine rolle was hier steht}
  for loop1:=0 to (n-1) do {y}
      for loop2:=0 to (d-1) do {x}
      begin
      i:=loop2+(loop1*n);
      Feld[i]:= TSpeedButton.Create(Self);
      
      with Feld[i] do begin
           Name:= 'Feld'+IntToStr(i);
           Top:= 40+(loop1*25);
           Left:= 20+(loop2*25);
           Width:= 25;
           Height:= 25;
           Glyph.LoadFromFile('Feld.bmp');
           Tag:=i;
           end;

      end;
      
  result:=true;
end;

un die ruf ich von der 2. unit aus auf:

Form1.CreateFeld(i:integer); ich krieg aber immer den fehler: identifier not found 'i'
an was liegt das??
  Mit Zitat antworten Zitat