AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Tutorials Delphi Tutorial zur DP-Collection
Tutorial durchsuchen
Ansicht
Themen-Optionen

Tutorial zur DP-Collection

Ein Tutorial von alcaeus · begonnen am 23. Aug 2005 · letzter Beitrag vom 14. Sep 2007
Antwort Antwort
Benutzerbild von Weazy
Weazy

Registriert seit: 7. Apr 2005
Ort: Bern (Schweiz)
414 Beiträge
 
Delphi 2007 Enterprise
 
#1

Re: Tutorial zur DP-Collection

  Alt 21. Mär 2006, 23:49
Ich versuche gerade alle properties einer VCL mit der dbcollection zu speichern und wieder zu laden. Dazu habe ich mal folgende Test unit geschrieben:
Delphi-Quellcode:
unit Unit2;

interface

uses dpCollection,StdCtrls;

type TSimpleCollectionItem = class(TCollectionItem)
private
fCaption: String;
fbutton:tbutton;
public
procedure Assign(Source: TPersistent); override;
procedure assignbutton(const value:tbutton);
published
constructor Create(Collection : TCollection); override;
destructor Destroy; override;
property Caption: String read fCaption write fcaption;
property button: tbutton read fbutton write assignbutton;
end;


implementation

uses Unit1;

constructor TSimpleCollectionItem.Create(Collection: TCollection);
begin
  inherited Create(Collection);
  fbutton:=tbutton.Create(self);
end;

destructor TSimpleCollectionItem.destroy;
begin
  fbutton.free;
end;

procedure TSimpleCollectionItem.assignbutton(const value:tbutton);
begin
fbutton.Assign(value);
end;

procedure TSimpleCollectionItem.Assign(Source: TPersistent);
begin
if Source is TSimpleCollectionItem then
begin
fCaption := TSimpleCollectionItem(Source).Caption;
fbutton:=tSimpleCollectionItem(source).button;
end
else
inherited Assign(Source);
end;

end.
Das Problem ist nur das fbutton:=tbutton.Create(self); natürlich nicht möglich ist. Ich weiss nicht mal ob ich auf dem richtigen Weg bin ...

Mein Ziel ist es, eine unbestimmte Anzahl von VCL in eine Datei zu speichern und wieder zu laden (Level Editor). Ich hoffe ihr könnt mir helfen, Danke schon mal im Voraus!
Philippe Wechsler
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:07 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz