Eingabezeichen in TEdit

[Thomm]

Kann mir jemand sagen, wie man das Eingabe-Zeichen, nicht den Focus,

in ein TEdit setzt, sodass man ohne darauf zu klicken , was reinschreiben kann. 8)

[mkinzler]

Sollte doch durch Fokusieren geschehen, oder was meinst du?

[taaktaak]

Abgesehen davon, dass m.E. das Edit immer den Focus erhält, wenn du etwas mittels der Tastatur eingibts - welchen Sinn sollte das haben?

[Thomm]

Ich muß erst mit der Maus in das Edit1 klicken, damit ich was reinschreiben kann.

Mit Edit1.SetFocus ändert sich auch nichts

[mkinzler]

Versuch es mal mit

Delphi-Quellcode:

Edit1.Selstart := 0;

[haentschman]

Guten Morgen...

wenn das Edit den Focus hat (Edit.Setfocus) dann kannst du auch direkt reinschreiben.

:gruebel: da läuft irgend etwas anderes schief. Wieviel Code ist es denn ?

[Jeff93]

Meinst du sowas?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  PositionDesZeichens : Integer;
begin
  PositionDesZeichens := 0; //vor erstem Zeichen
  Edit1.SetFocus;
  Edit1.SelStart := PositionDesZeichens;
end;

Mfg, Jeff93

[Sherlock]

Per Tab kommt man auch in ein Edit, vorausgesetzt es ist in der Tabreihenfolge.

Sherlock

[Thomm]

Das Formular Form3 mit dem Edit1 wird erst über Menü aufgerufen,

nach dem Öffnen soll man in das Feld Edit1 was reinschreiben können.

Mit Form3.Edit1.SetFocus ändert sich nichts, man muß erst mit der Maus in das Feld klicken,

damit man was reinschreiben kann.

[Sherlock]

Dann setz es in der Tabreihenfolge an erster Stelle, das sollte schon ausreichen.
Edit: Und SetFocus noch dazu...genauso funktioniert es in einigen meiner Anwendungen.

Sherlock

[DeddyH]

Zeig doch mal Deinen Code.

[taaktaak]

Aha, also der zusätzliche Mausklick soll gespart werden! Das ist ein Argument. Frage ist nun: Wie ist der Aufbau / die Logik deines Formulars. Erfolgen vor der Eingabe in das Edit irgendwelche standardmäßigen Abläufe oder Eingaben? Wenn ja, kannst du als letzten Befehl der vorhergehenden Aktion den Focus wie z.B. von Jeff beschrieben auf das Edit setzen.

// edit: dann im OnShow() den Focus setzen

[Jeff93]

Versuch mal alternativ mit Tabs. Mach ein Rechtsklick aufs Formular und sieh dir Tabulatorreihenfolge an. dann kann der Nutzer sich mit der der Tab-TAste durch dein Formular weiterarbeiten.

Bei mehreren aufrufen der Form mit Show oder ShowModal musst du glaube ich zumindest den Focus wieder ins erste Feld setzen.

[haentschman]

Zitat:

Das Formular Form3 mit dem Edit1 wird erst über Menü aufgerufen,

nach dem Öffnen soll man in das Feld Edit1 was reinschreiben können.

Mit Form3.Edit1.SetFocus ändert sich nichts, man muß erst mit der Maus in das Feld klicken,

damit man was reinschreiben kann.

... setze einfach Edit1.SetFocus im OnShow von Form3. Aus Form1 heraus z.B. kannst du den Focus nicht dahin setzen.

[Thomm]

Liegt vielleicht daran, dass das Edit1 auf einem Panel1 ist.

Nur wegen der Optik 8)

[DeddyH]

Mach es mal so, wie haentschman geschrieben hat, das muss eigentlich gehen.

[taaktaak]

Nee, muss trotzdem funktionieren

[haentschman]

Zitat:

Liegt vielleicht daran, dass das Edit1 auf einem Panel1 ist.

...ist schnuppe. 8)

[Thomm]

Zitat:

Zitat von DeddyH

Mach es mal so, wie haentschman geschrieben hat, das muss eigentlich gehen.

Delphi-Quellcode:

procedure TForm3.FormShow(Sender: TObject);
begin
  Edit1.SetFocus;
end;

Geht nicht, es sollte das Eingabezeichen im Edit1 blinken, damit man was reinschreiben kann

[taaktaak]

Das muss eine andere Ursache haben, das MUSS eigentlich funktionieren.

[Jeff93]

Zeig mal die Unit ganz so kommt's nichts voran

Edit: So kann man was reinschreiben ohne dass gleich der ganze Text im Edit selektiert ist

Delphi-Quellcode:

procedure TForm2.EditEnter(Sender: TObject);
begin
  //gemeinsame Rountine für die Edit-Komponenten auf dem Formular
  TEdit(Sender).SelStart := 0;
end;

procedure TForm2.FormShow(Sender: TObject);
begin
  Edit1.SetFocus;
end;

[Thomm]

ICH HABS

Delphi-Quellcode:

Procedure TForm3.FormShow(Sender:TObject);
begin
application.ProcessMessages;
 Edit1.SetFocus;
end;

application.ProcessMessages;

Jetzt gehts

[taaktaak]

Seltsam, normalerweise ist das nicht erforderlich :roll:

[haentschman]

Zitat:

application.ProcessMessages;

:gruebel: kann es sein, daß auch ohne Application.ProcessMessages das EditFeld den Focus hat und du schreiben könntest aber der Cursor nicht sichtbar ist ?
...ich habe diesen Effekt auch manchmal und kann das nicht erklären.

[Thomm]

Zitat:

Zitat von haentschman

Zitat:

application.ProcessMessages;

:gruebel: kann es sein, daß auch ohne Application.ProcessMessages das EditFeld den Focus hat und du schreiben könntest aber der Cursor nicht sichtbar ist ?
...ich habe diesen Effekt auch manchmal und kann das nicht erklären.

Stimmt

Ist bei mir genauso

Ich hab was reingeschrieben , ohne dass man den Cursor sieht

Vielleicht noch ein Tip ,wie kann ich das Form3 genau in die Mitte des Bildschirms setzen ?

[DeddyH]

Delphi-Quellcode:

Position := poScreenCenter;

[haentschman]

Zitat:

...ich habe diesen Effekt auch manchmal und kann das nicht erklären.

... ich hatte "damals" mit diversen Varianten probiert den Cursor "sichtbar" zu machen, ohne Erfolg.
... vieleicht sollte ich mal Deine Variante mit Application.ProcessMessages probieren :gruebel:

bis bald...

[Thomm]

Zitat:

Zitat von taaktaak

Seltsam, normalerweise ist das nicht erforderlich :roll:

Kommt auf die Hardware an :?

Wenn du einen großen Arbeitsspeicher hast, dann ist es nicht erforderlich

[DeddyH]

Wieviel Speicher brauche ich denn, um einen Cursor anzuzeigen? :cyclops:

[Thomm]

Zitat:

Zitat von DeddyH

Wieviel Speicher brauche ich denn, um einen Cursor anzuzeigen? :cyclops:

Dann weiß ich auch nicht woran das liegt ! :roll: