Forum: Programmieren allgemein
Delphi
by himitsu,
5. Jul 2023
@Redeemer
Das abschließende #13#10 beim TStrings.Text ist eigentlich ein sLineBreak, bzw. ganz genau das TStrings.LineBreak.
Merkst du, wenn nicht für Windows kompiliert wird und die Unixoiden bloß ein #10 haben.
Und dafür gibt es auch schon eine Lösung: TStrings.TrailingLineBreak
https://docwiki.embarcadero.com/Libraries/de/System.Classes.TStrings.TrailingLineBreak
Forum: Programmieren allgemein
Delphi
by himitsu,
3. Jul 2023
Click ist nur Protected, also aus "deinem" Code auch nicht zugänglich.
Bei TButton dagegen wurde es nach Puplic verschoben, somit kann dort direkt aufgerufen werden.
Forum: Programmieren allgemein
Delphi
by himitsu,
2. Jul 2023
Nja, bissl blöd lief wohl, dass es normal "unsichtbar" ist und es somit auch kaum jemand sah.
Gerade bei der CheckBox spräche ja nichts dagegen, dass endlich mal published zu machen.
https://quality.embarcadero.com/browse/RSP-41926?jql=text%20~%20ClicksDisabled
Uwe :stupid:
Forum: Programmieren allgemein
Delphi
by himitsu,
2. Jul 2023
Minimierte Beispiele, sind eben nicht immer naturgeträu.
z.B. BOOL aus WinAPIs ist 32 Bit / 4 Byte groß und wird dann auf das 1 Byte (Boolean) umgebrochen, was aber eben im Delphi auch nicht ganz genau dem ByteBool entspricht.
Unter Windows ist die Konstante "True" z.B. -1, aber im Pascal bzw. Delphi ist es +1.
Boolean ist nunmal eben nicht 1 Bit, was wirklich ausschließlich 0 und 1 kennen...
Forum: Programmieren allgemein
Delphi
by himitsu,
2. Jul 2023
if ... = True then gehört sowieso in garkeine Delphiversion rein.
Forum: Programmieren allgemein
Delphi
by himitsu,
29. Jun 2023
Es fing ja schon damit an, dass auch die nutzerseitige Änderung im OnClick ankommt, und es kein OnChange gab/gibt. (DevExpress hat bei seiner TcxCheckBox zusätzlich ein OnChange)
und da das "Click" somit eigenlich "Change" bedeutet, ist es "richtig", dass es beim Change auch klickt :angle2:
Forum: Programmieren allgemein
Delphi
by himitsu,
29. Jun 2023
Weil jemand vor über 20 Jahren dachte es wäre cool so.
Und nun bleibt es so, weil is halt so. :angle:
Einige haben sich über eine Ableitung, oder einen ClassHelper, da was gebaut. :zwinker:
//property CheckedNoClick: Boolean read GetCheckedNoClick write SetCheckedNoClick stored False;