Einzelnen Beitrag anzeigen

Nogge

Registriert seit: 15. Jul 2004
336 Beiträge
 
Delphi 7 Professional
 
#9

Re: auf dynamische lokal erstellte form zugreifen

  Alt 27. Mai 2005, 13:41
mmh, dann halt als Extra-Post^^
Ich habe es jetzt erst mal mit einem array of TForm versucht und dabei folgendes Problem entdeckt:
Delphi-Quellcode:
procedure TF_Session.DeleteArray(var a:array of TF_Session; Index:Integer);
begin
  a[Index]:=a[High(a)];
  { -- letze Form aus array entfernen -- }
  FreeAndNil(a[Length(a)-1]);
  SetLength(a,Length(a)-1);
end;
Wieso zeigt mir der Compiler bei SetLength "inkompatible Typen" an?
[edit] Habe das Problem jetzt lösen können^^ Ich musste vorher noch den ArrayTyp als Parameter anders angeben:
Delphi-Quellcode:
type
  TFormArray = array of TForm;

procedure DeleteArray(var a:TFormArray; Index:Integer);
[/edit]
  Mit Zitat antworten Zitat