Hallo
DP,
ich möchte gerne zur Laufzeit meines Programmes eine eigene Klasse erstellen.
Diese Klasse soll einen Computer repräsentieren und zwei Label für den Namen und die
IP-Adresse besitzen.
Delphi-Quellcode:
type
TLCComputer =
class
public
Name,
IP: TLabel;
Column, Row: integer;
end;
So habe ich den Typ definiert und nun möchte ich gerne eine Instanz davon erzeugen, sodass die Labels auch sichtbar werden.
Mit Computers vom Typ "array of TLCComputers" versuche ich per
Delphi-Quellcode:
SetLength(Computers, Length(Computers) + 1);
Computers[Length(Computers)-1].Name := TLabel.Create(self);
Computers[Length(Computers)-1].Name.Parent := FrmLC;
Computers[Length(Computers)-1].Name.Left := Column * (cComputerWidth + cComputerSpaceV);
Computers[Length(Computers)-1].Name.Top := Row * (cComputerHeight + cComputerSpaceH);
Computers[Length(Computers)-1].IP := TLabel.Create(self);
Computers[Length(Computers)-1].IP.Parent := FrmLC;
Computers[Length(Computers)-1].IP.Left := Column * (cComputerWidth + cComputerSpaceV);
Computers[Length(Computers)-1].IP.Top := Row * (cComputerHeight + cComputerSpaceH) + 10;
zur Laufzeit die Label zu erstellen und auf dem Formular "FrmLC" zu erschaffen.
Jedoch erhalte ich beim Start stets nur Zugriffsverletzungen...
Was mache ich falsch?
Schonmal danke für eure Hilfe!
greetZ 64Jabor