Kann man den OK button einer InputBox editiren?

[kagi3624]

Hallo,

ist es möglich das Caption des OK Buttons einer InputBox zu ändern?

[jaenicke]

Hier findest du ein Beispiel:
https://www.delphibasics.info/home/d...ringsatruntime

[kagi3624]

Danke, es funktioniert. Da ich allerdings in einer Funktion erst das modifizierte Fenster benötige und später die Standardvariante, gibt es eventuell eine einfachere Methode es zurückzusetzen, als nochmal alles zu redefinieren?

[jaenicke]

Zitat von kagi3624:

gibt es eventuell eine einfachere Methode es zurückzusetzen, als nochmal alles zu redefinieren?

Wie sollte es einfacher gehen als mit dem Aufruf einer solchen Funktion (HookResourceString)?

Übrigens wäre NativeUInt statt Integer dort korrekt, damit es auch unter 64 Bit klappt.

[kagi3624]

Zitat von jaenicke:

Zitat von kagi3624:

gibt es eventuell eine einfachere Methode es zurückzusetzen, als nochmal alles zu redefinieren?

Wie sollte es einfacher gehen als mit dem Aufruf einer solchen Funktion (HookResourceString)?

Übrigens wäre NativeUInt statt Integer dort korrekt, damit es auch unter 64 Bit klappt.

Seit welcher Delphi Version gibt es NativeUInt? Hab danach gesucht, konnte aber nichts finden.

[Klaus01]

.. laut diesem Eintrag hier -> https://blog.dummzeuch.de/2018/09/08...lphi-versions/
Delphi 7

Grüße
Klaus

[dummzeuch]

Zitat von Klaus01:

.. laut diesem Eintrag hier -> https://blog.dummzeuch.de/2018/09/08...lphi-versions/
Delphi 7

Wobei man nicht übersehen darf, dass die Deklaration in Delphi 7 und 2007 falsch ist (64 Bit statt 32). Das war der Anlass für meinen Blogpost.

[himitsu]

NativeInt ist per se keine Erfindung von Embarcadero.

Die Hersteller von 64-Bit-CPUs hatten sich entschieden den Typ INT einzufrieren nicht nicht mehr wachsen zu lassen ... stattsdessen wurde ein neuer Typ erfunden, welcher sich in Delphi NativeInt und NativeUInt schimpft (für die alten Integer und Cardinal).

Und in Delphi gibt es diesen Typen natürlich erst seit den 64 Bit-Compilern


Aber auch wenn es ging und eigentlich auch weiterhin gegangen wäre (häte man den nicht eingefroren),
war dieser Typ hier eh schon immer falsch.
z.B. IntPtr wäre hier gut, oder bei SendMessage/PostMessage gibt es auch die Typen LPARAM, WPARAM und LRESULT.

Statt Integer öfters mal den jeweils "richtigen" Typen zu verwenden, erspart später oft viel Arbeit.

[dummzeuch]

Zitat von himitsu:

Und in Delphi gibt es diesen Typen natürlich erst seit den 64 Bit-Compilern

Nein, eben nicht. NativeInt / NativeUInt gibt es tatsächlich seit Delphi 7 und war bis Delphi 2007 fälschlicherweise als 64 Bit Integer deklariert. Danach dann wieder korrekt als 32 Bit Integer.

Als es dann 64 Bit Compiler gab (Delphi XE2?), wurde je nach Target NativeInt / NativUInt als 32 oder 64 Bit Integer deklariert.

[jaenicke]

Zitat von himitsu:

Aber auch wenn es ging und eigentlich auch weiterhin gegangen wäre (häte man den nicht eingefroren),
war dieser Typ hier eh schon immer falsch.
z.B. IntPtr wäre hier gut

Intern ist der Typ an der Stelle in PResStringRec NativeUInt...
http://docwiki.embarcadero.com/Libra....TResStringRec

Und ob der nun dort gut passt oder nicht: Ich orientiere mich an dem, was in der RTL usw. intern auch verwendet wird.