Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DrUArn,
8. Mär 2012
Hallo,
Dein Einwurf ist korrekt - werde in Bälde ein neues Thema öffnen!
Gruß Uwe
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DrUArn,
7. Mär 2012
Hi,
schnell ein Test - nicht viel Zeit!
Ich habe erstmal die Procedure wiederhergestellt:
procedure TTestpanel_UA.FilterGetChildren(Child: TComponent);
begin
if (Child<> Fted) and (Child<> FcheckA) then
fFilterGetChildrenProc(child);
end;
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DrUArn,
6. Mär 2012
Hi,
@ einbeliebigername:Danke für umfängliche Antwort. Das muß ich mir gaaanz langsam durchlesen. Klingt kompliziert.
Owner der Subkomponenten auf nil setzen?
z.b. testpanel.ted.owner:=nil ist verboten - nur-Lesen-Eigenschaft!
habe die {$IFDEF WithFilter} Methoden auf meine Komponente (ohne zu verstehen) angewendet - funktioniert.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DrUArn,
6. Mär 2012
Hi,
tschuldigung, eine Berichtigumg noch,
beim Lesen muß es richtig heißen:
testpanel1:=readComponentResFile('d:\testpanel.tmp',nil) as TTestpanel;
//bzw.
testpanel1:=fstream.readComponent(nil) as TTestpanel;
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by DrUArn,
6. Mär 2012
Hi, comm.,
habe ein Problem beim Schreiben/Lesen neuer Komponenten
TTestpanel = class(Tpanel)
private
FcheckA: TCheckBox;
Fted: TEdit;
{ private declarations }
protected
{ protected declarations }