Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
22. Feb 2018
@Uwe Raabe
Habe die Anwendung eines Helpers inzwischen gelernt - praktisch.
Werden eigentlich neue published Eigenschaften aus dem helper mit gespeichert z.B.
WriteComponentResFile(Filename,RicheditMitHelper_ua1);
?
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
21. Feb 2018
Hallo Uwe Raabe,
bei mir kommen folgende Fehler im Helper
TRichEditHelper = class helper for TRichEdit
private
function GetDockOpts_UA: tDockOpts_UA;
procedure SetDockOpts_UA(const Value: tDockOpts_UA);
public
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
21. Feb 2018
@himitsu
ja, man lernt nie aus. Mir war gar nicht klar, das hinter einem set ein Zahl steht.
@Uwe Raabe
das war nur mein Beispiel. Diese Eigenschaften werden je nach Bedarf einzeln gesetzt und entsprechend in Tag umgerechnet. Einen entsprechenden Helper habe ich auch - aber deutlich umständlicher arbeitend als dein Vorschlag - oder doch nicht - ich habe eine extra Klasse von tcomponent...
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
21. Feb 2018
Hallo Uli Gerhardt,
stimmt - mit word(Opts) wird das ordnungsgemäß umgewandelt (Staun!).
Ich schaue mir das jetzt noch mal in Ruhe an und was es wo bringt und melde mich Morgen nochmal.
Danke für's Mitdenken.
Gruß Uwe
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
21. Feb 2018
Hallo Uli Gerhardt,
danke für die Hinweise.
#3 werde ich nutzen - das macht's bequemer.
#5 Tag:=byte(opts); ist eine ungültige Typumwandlung
Gruß Uwe
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
21. Feb 2018
Hi Ulli Gerhardt,
Über tcomponent.TAG speichere ich verschieden Eigenschaften ines objects (hier ist's ein trichedit).
Den TAG gibt's bei allen Komponenten, ich brauche keine speziellen Kompententen entwickeln, deren Verhalten ich verändern will.
Stammt noch aus der Zeit, als man Speicherplatz sparen mußte. Und in Tqg kann mann viele Informationen unterbringen.
tDockOpt_UA=(...
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
21. Feb 2018
Hi Comm,
type
tdockopt_UA=( DockBasicSize_UA, //gehört bei der Größenbestimmung dazu
DockAuto_UA, //soll von self angedockt werden
DockHori_UA) //Anordnung von in horizontaler Reihenfolge sonst vertiKal