Forum: Object-Pascal / Delphi-Language
Delphi
by Captnemo,
8. Okt 2014
Bisher sieht meine so aus.
Alles gezeichnet. Aber ich habe mit Panel und Splitter das so gelöst, damit man die Breite der Namenspalte aus User verschieben kann.
Die Enträge kann man anklicken und damit bearbeiten. Verschiebe und Größe ändern kommt noch.
Forum: Object-Pascal / Delphi-Language
Delphi
by Captnemo,
8. Okt 2014
Ich hab den Fehler mittlerweile gefunden.
Ich hatte in den Setter-Methoden teilweise die damit gesetzten Parameter an anderen Controls z.b. ein Panel weitergegeben. Hab aber vergessen, vorher auch zu prüfen, ob diese Controls überhaupt schon existieren.
z.B so:
procedure TUrlaubsplaner.SetWidthPersons(const Value: Integer);
begin
FWidthPersons := Value;
FPanelLeft.Width:=Value;
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by Captnemo,
8. Okt 2014
Ich hab das jetzt mal so umgesetzt.
Wenn ich jetzt die Komponente auf ein Formular setze, läuft alles glatt.
Bis hier hin erst mal vielen Dank für die Hilfe.
Forum: Object-Pascal / Delphi-Language
Delphi
by Captnemo,
6. Okt 2014
Das kann ich zwar machen, aber dann wird zur Entwurfszeit nicht gezeichnet. Das wäre aber wichtig, weil man sonst nicht sehen kann, wie sich Änderungen an den Parametern auf die Darstellung auswirken.
Forum: Object-Pascal / Delphi-Language
Delphi
by Captnemo,
6. Okt 2014
Im Constructor erzeuge ich mir einige Panels, die angeordnet werden, und PaintBoxes, die mit bestimmten Inhalten gefüllt werden.
Die Panels werden nur erzeugt und über Align, Width und Color ein bischen in Form gebracht.
Bei den Paintboxen auch Align und Witdh gesetzt, aber im entprechenden OnPaint natürlich auch was gezeichnet. Dort greife ich auf den Canvas von den Paintboxen zu, was den...
Forum: Object-Pascal / Delphi-Language
Delphi
by Captnemo,
6. Okt 2014
Hi,
bei einer Komponente habe ich den Constructor Create überschrieben:
public
constructor Create(AOwner: TComponent); override;
constructor TUrlaubsplaner.Create(AOwner: TComponent);
begin
inherited Create(AOwner);