TEdit-Komponente mit AnsiString

[himitsu]

Die TEdit-Komponente ableiten und mindestens die Stelle anpassen, wo das CreateWindow ausgeführt wird.
Und dann eben das neue TAnsiEdit in der IDE registrieren und verwenden.

Außerdem kannst in TEdit/TCustomEdit dir abgucken, wie das mit den Charsets an Windows übergeben wird.


oder (ein Doppel-Beispiel, nur halt andersrum)
https://www.delphipraxis.net/141895-...phi-other.html


oder ein älteres Delphi nutzen, also Delphi 2 bis Delphi 2007


und dann gäbe es noch FreePascal/Lazarus ... das ist noh "halb" auf ANSI, nur wird da an vielen Stellen die CodePage für UTF-8 verwendet.

[colcok]

Okay, dank euch, konnte eine Editbox mit dem SetWindowPos-Aufruf sichtbar machen,
auch wenn sie etwas rudimentär ausschaut, aber das ist auch nicht wichtig.

Wäre es im Prinzip ausreichend, folgenden Code in onChange zu setzen?

Code:

void __fastcall TForm1::edtBox(TObject *Sender)
{
  TEdit *DBBoxChange = dynamic_cast<TEdit *>(Sender);
  int codepage = readCodepage();
  RawByteString rbStr(DBBoxChange->Text);
  SetCodePage(rbStr, codepage, false);
  
  DBBoxChange->Text = rbStr;
}