Edit-Feld ohne Cursor

[Stefan92]

Hallo,

ich finde, der Titel sagt schon alles.
Ich möchte halt, dass mein Edit-Feld keinen Cursor zulässt.
Danke schonmal im Voraus für eure Hilfe.

Gruß

Stefan

[sniper_w]

Du könntest eine eigene Komponente schreiben, ausgehend von TGraphicControl.

[marabu]

Hallo Stefan,

bevor du mit dem Entwickeln der neuen Komponente anfängst: Meinst du das Caret oder den Cursor?

Grüße vom marabu

[himitsu]

ich vermute mal dat Caret ... wenn ich mich nicht irre, dann liegt daheim irgendwo 'ne Demo zum veränder des Carets eines Memos (werd da mal nachsehn), dat könnte man bestimmt entsprechend abändern...

[Stefan92]

Gute Frage.
Da ich den Unterschied von Caret und Cursor nicht kenne, fällt es mir schwer, diese zu beantworten.
Ich meine auf jeden Fall das Teil, was immer blinkt.

Gruß

Stefan

[marabu]

Dann hat Frank recht mit seiner Vermutung. Das Caret signalisiert den Einfügepunkt in einem Text-Control (Edit, Memo, ...). Es wird nur gezeigt, wenn ein Eingabefeld den Focus besitzt. Es lässt sich mit der Windows API Funktion HideCaret() abschalten, aber warum willst du das tun? Wäre nicht vielleicht eine andere Komponente die passendere?

Freundliche Grüße

[Stefan92]

Also, ich habe einen Taschenrechner programmiert, der sich auch über Tastatur bedienen lässt. Da ich nicht will, dass unberechenbarer Quatsch in mein Editfeld (welches als Ein- und Ausgabefeld der Rechnungen dient) geschrieben wird, habe ich ReadOnly auf false gesetzt. Allerdings blinkt der Caret (Wenn das Caret heisst, wie definiert man dann einen Cursor? ) trotzdem, und egal an welcher Stelle der Caret blinkt, die Ziffern, die eingegeben werden, werden immer an die letzte Stelle versetzt, was den User irritiert. Um dies zu vermeiden, wollte ich den Caret unterbinden. Vielleicht könnte ich aber auch das Fokusieren des Editfeldes vermeiden...
Nunja, die Lösung HideCaret(); klappt bei mir nicht, weil er noch irgendwelche Parameter möchte, aber ich in der Hilfe nichts darüber finde.
Und da ich noch nicht so lange programmiere, beschränkt sich mein Wissen lediglich auf die Standardkomponenten .
Was für Komponenten könntest du denn empfehlen?
Aber, wenn möglich, würde ich gerne beim praktischen Editfeld bleiben.

Gruß

Stefan

PS:Wenn ihr schon beim Antworten seid, guckt doch mal in meinen anderen offenen Thread.

[marabu]

Wenn du die Edit-Komponente im ReadOnly-Modus - quasi nur als Display - benutzt, und die Eingabe über Buttons oder die KeyPreview der Form erledigst, dann könntest du doch ein Panel oder eine andere schicke Komponente (LCDPanel) verwenden, eventuell noch einen speziellen Font.

Freundliche Grüße

[Stefan92]

Erstmal danke für eure Antworten.
Aber ich finde das Panel macht sich nicht allzu gut, ich würde das lieber lassen. Wo kann ich denn das LCD-Panel finden?
Und seid ihr wirklich sicher, dass es mit dem Edit nicht geht? Das würde immer noch am besten aussehen.

Gruß

Stefan

[edit]Achja, und was ist mit der Funktion HideCaret Wie funktioniert die denn nun? [/edit]

[marabu]

Hallo Stefan,

um das Caret in deinem Edit mit HideCaret() zu verstecken musst du den richtigen Augenblick abpassen - OnEnter() ist zu früh, da das Control zu diesem Zeitpunkt noch nicht den Fokus erhalten hat und das Caret noch gar nicht existiert. Da hilft dir eine benutzerdefinierte Nachricht UM_HIDECARET:

Delphi-Quellcode:

const
  UM_HIDECARET = WM_USER;

type
  TDemoForm = class(TForm)
    Edit: TEdit;
    procedure EditEnter(Sender: TObject);    
  private
    procedure UMHideCaret(var msg: TMessage); message UM_HIDECARET;
  end;

procedure TDemoFrom.UMHideCaret(var msg: TMessage);
begin
  HideCaret(Edit.Handle);
end;

procedure TDemoFrom.EditEnter(Sender: TObject);
begin
  PostMessage(Handle, UM_HIDECARET, 0, 0);
end;

Wegen anderen Komponenten kannst du mal bei den LMDTools schauen oder bei Torry.

Freundliche Grüße