Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  AW: Form des blnkenden Textcursor bei TEdit ändern

   
    by Willie1, 8. Feb 2014
  Hallo TP,
  RESPEKT: beide Rezepze klappen gut!!! Ich hatte gestern Abend etwas übersehen. Das ist genau, was ich wollte. Es ermöglicht es einem sehbehinderten Anwender, Daten ein zu geben.
  Deine Rezepte zeigen, wie einfallslos die Programmierer der Bank-Software sind. Obwohl der Bildschirm groß genug ist, ist die Schrift winzig, weder wird das fokussierte Feld eingefärbt noch das Caret...
• Forum: Win32/Win64 API (native code)

  AW: Form des blnkenden Textcursor bei TEdit ändern

   
    by Willie1, 7. Feb 2014
  Hallo TP vielen Dank für deine Mühe.
  procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
  begin
  if CreateCaret(TEdit(Sender).Handle,1,5,12) then ShowCaret(TEdit(Sender).Handle);
  end;
  
  Nur wenn ich diesen Code einfüge wird nach dem Drücken einer beliebigen Taste das neue Caret sichtbar.
  Ich habe deinen Code mit Copy and Paste eingefügt.
  
  Gruß Willie
• Forum: Win32/Win64 API (native code)

  AW: Form des blnkenden Textcursor bei TEdit ändern

   
    by Willie1, 7. Feb 2014
  Hallo DeddyH,
  mit CreateCaret in OnKeyDown klappt es. Es ist aber nicht genau, was ich wollte. Das vergrüßerte Caret sollte das focussierte Feld leichter erkennbar machen. das wird aber erst sichtbar, wenn ich eine Taste gedrückt habe. Ich werde das fokussierte Feld gelb einfärben. (OnEnter und OnExit).
  
  Danke und Gruß
  Willie.
• Forum: Win32/Win64 API (native code)

  AW: Form des blnkenden Textcursor bei TEdit ändern

   
    by Willie1, 5. Feb 2014
  Hallo Danke TP!
  
  procedure TForm1.FormCreate(Sender: TObject);
  begin
  if CreateCaret(Edit1.Handle,0,10,10) <> NULL then beep;
  ShowCaret(Edit1.Handle);
  end;
  
  Dieser Code wird aktzeptiert aber das Caret ändert sich nicht. Wo muss der Code stehen, ich habe es auch mit OnEnter versucht.
  (Es beept - Bei Return <> NULL ist der Aufruf erfolgreich Delphi-Hilfe)
• Forum: Win32/Win64 API (native code)

  Form des blnkenden Textcursor bei TEdit ändern

   
    by Willie1, 5. Feb 2014
  Hallo Leute,
  bei dem Überweisungscomputer der Postbank wurde bei der Eingabe ein blinkendes Kästchen als Cursor benutzt, was sehr gut zu sehen war. (Seit der Umstellung auf SEPA ist es der schmale blinkende Strich(Standart), was für mich ungünstig ist).
  Nach Aussage der Postbank laufen die ÜW-Rechner mit Win XP!
  
  Wie kann ich ein blinkendes Kästchen als Text-Cursor bei TEdit in eine eigene...