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