AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Fokus von TEdit aufheben

Ein Thema von Scurra · begonnen am 16. Feb 2015 · letzter Beitrag vom 25. Feb 2015
Antwort Antwort
Scurra

Registriert seit: 19. Jan 2015
81 Beiträge
 
Delphi 10.3 Rio
 
#1

Fokus von TEdit aufheben

  Alt 16. Feb 2015, 19:15
Hallo zusammen,

ist es möglich, den Fokus einer TEdit-Komponente aufzuheben, sobald man neben das Formular oder irgendwo im Formular (außer auf die TEdit-Komponente) klickt (evtl. sollen dabei auch andere Eigenschaften wie die Sichtbarkeit verändert werden)? Ich möchte verhindern, extra für jede Komponente auf meinem Formular entsprechenden Code ins entsprechende OnClick-Event zu schreiben, da das ziemlich umständlich ist. Ich habe dazu leider nichts gefunden.

Hintergrund ist, dass ich ähnlich wie in Windows Ordner und Dateien umbenennen in meinem Programm umbenennen möchte.
  Mit Zitat antworten Zitat
hathor
(Gast)

n/a Beiträge
 
#2

AW: Fokus von TEdit aufheben

  Alt 16. Feb 2015, 19:22
Setze den Focus einfach auf den EXIT-Button:

Delphi-Quellcode:
procedure TForm1.FormClick(Sender: TObject);
begin
bnExit.SetFocus;
end;
  Mit Zitat antworten Zitat
Scurra

Registriert seit: 19. Jan 2015
81 Beiträge
 
Delphi 10.3 Rio
 
#3

AW: Fokus von TEdit aufheben

  Alt 19. Feb 2015, 17:57
Sorry, es hat etwas länger gedauert.

Der Vorschlag klappt zwar, wenn ich irgendwo auf das Formular klicke, aber wenn ich auf eine Komponente, die sich auf dem Formular befindet, klicke, dann wird das OnClick-Event des Formulars nicht ausgelöst. Ich habe jetzt die am wenigsten elegante Lösung gewählt, die ich eigentlich vermeiden wollte: Ich habe einfach bei allen Komponenten, bei denen sich bei einem Klick der Fokus nicht ändert, in der Click-Prozedur den Fokus auf das Formular bzw. auf eine Scrollbox, die sich auf dem Formular befindet, gesetzt.
  Mit Zitat antworten Zitat
hathor
(Gast)

n/a Beiträge
 
#4

AW: Fokus von TEdit aufheben

  Alt 19. Feb 2015, 19:13
Delphi-Quellcode:
procedure TForm1.Edit1MouseLeave(Sender: TObject);
begin
bnExit.SetFocus;
end;
  Mit Zitat antworten Zitat
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#5

AW: Fokus von TEdit aufheben

  Alt 19. Feb 2015, 20:29
Delphi-Quellcode:
procedure TForm1.Edit1MouseLeave(Sender: TObject);
begin
bnExit.SetFocus;
end;
Dann sollte man aber beim Schreiben in das Edit die Maus festnageln, sonst gibt das lustige Effekte
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.316 Beiträge
 
Delphi 12 Athens
 
#6

AW: Fokus von TEdit aufheben

  Alt 19. Feb 2015, 21:20
Erstmal solltest du definieren was "aufheben" eigentlich heißen soll.
  • Fokus weg vom Edit ... irgendwo hin
    irgendeinAnderesControl.SetFocus;
  • Fokus weg vom Edit, aber auch nicht zu einem anderem Control (hier bekommt die Form selber den Fokus)
    {Self.}ActiveControl := nil;
  • Fokus weg vom Edit und auch gleich weg von der Form (bei nur einer Form wie Letzteres)
    andereForm.SetFocus;
  • Fokus weg vom Edit und auch gleich weg vom ganzen Programm
Ein Therapeut entspricht 1024 Gigapeut.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:44 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz