Zitat von
ste_ett:
wird weder erzeugt
noch freigegeben/zerstört
.
Aber das ist doch eine Eigenschaft, die auf vLabel zeigt.
Aufruf der Klasse:
Delphi-Quellcode:
procedure TMeineForm.MeineProcedure(Sender: TObject) {oder was auch immer};
var
Flughafen1: TFlughafen;
begin
Flughafen1 := TFlughafen.Create(Self);
Flughafen1.Output := Label1; //Das Label kann man ja im Objektdesigner Designen
Flughafen1.Enabled := True;
end;
EDIT:
Wenn der Text beim ersten Durchlauf der Klasse auf 20 Zeichen ist, dann stürzt das Programm mit der Fehlermeldung ab.
Wenn man beim 1. Durchlauf beispielsweise "Haben" als Text angibt, und dann erst einen 20-zeichen Text, dann ist es egal...
HÄ???
Faux Manuel
Wer weiß, dass er nichts weiß, weiß mehr, als der der nicht weiß, dass er nichts weiß.
GoTrillian