Einzelnen Beitrag anzeigen

bwolf

Registriert seit: 17. Jan 2006
368 Beiträge
 
Delphi 2009 Professional
 
#1

TThread : Array als Parameter

  Alt 25. Feb 2008, 12:34
Hi Leute,

ich möchte ein TThread-Object erstellen und diesem einen Array als Parameter übergeben, in dem ich den construcutor überschreibe:

Delphi-Quellcode:
type TPrintAntrag=class(TThread)
     constructor create(s: array of string);
     protected
      procedure execute; override;
     private
      Fs: array[0..100] of string;
end;



constructor TPrintAntrag.create(s: array of string);
begin
  Fs:=s; // FEHLER : "Incompatible types"
  Freeonterminate:=true;
  inherited create(false);
end;

procedure TPrintAntrag.execute;
begin
  // mach irgendwas
end;


// Befüllen des Arrays und starten des Threads
procedure TForm1.Button1Click(Sender: TObject);
var
  meinArray : array[0..100] of string;
  i : integer;
begin
  for i := 0 to 100 do
    meinArray[i] := intToStr(i);

  TPrintAntrag.create(meinArray);
end;

Problem: bei der Zuweisung Fs:=s; im constructor erhalte ich den Fehler
"[Error] Unit1.pas(102): Incompatible types"

Was mache ich verkehrt?
Danke für eure Hilfe,
gruß ben
  Mit Zitat antworten Zitat