AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi mit der Enter-Taste in Edits einen Tab simulieren
Thema durchsuchen
Ansicht
Themen-Optionen

mit der Enter-Taste in Edits einen Tab simulieren

Ein Thema von Helmi · begonnen am 11. Okt 2004 · letzter Beitrag vom 11. Okt 2004
Antwort Antwort
Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
 
Delphi XE2 Professional
 
#1

mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 16:47
Hallo,

ich habe ein Problem:

ich habe ein PageControl mit einer Seite.
Auf dieser Seite befinden sich ein paar Edits.

Ich möchte nun mit der Entertaste wie mit einem Tab von Feld zu Feld springen.

Ich habe mal einen Code dafür gefunden (siehe unten), der funktioniert aber nur, wenn sich die Edits auf der Form direkt befinden.

Was muss ich jetzt umbiegen, damits auch in dem PageControl funktioniert.
(ach ja - es gibt für PageControl kein KeyPress)

Code:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  If Key = #13 then
    begin
      Self.Perform(WM_NEXTDLGCTL, 0, 0);
      Key := #0;
    end;
end;
mfg
Helmi
  Mit Zitat antworten Zitat
olliaustor
(Gast)

n/a Beiträge
 
#2

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 16:55
Schon mal das ganze im OnKeyPress-Ereignis der Editfelder so ausprobiert:

Code:
procedure TForm1.EditfelderKeyPress(Sender: TObject; var Key: Char);
begin
  If Key = #13 then
    begin
      Parent.Perform(WM_NEXTDLGCTL, 0, 0);
      Key := #0;
    end;
end;
  Mit Zitat antworten Zitat
Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#3

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 16:56
Hai Helmi,

bei mir funktioniert das auch wenn die Edits auf einer Seite eines TPageControls liegen.
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat
Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
 
Delphi XE2 Professional
 
#4

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 16:57
sharky, kannst du mal kurz bitte ein kleines projekt zusammenstellen und es mi schicken?

mfg
Helmi
  Mit Zitat antworten Zitat
Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.027 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#5

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 16:58
Nö, funktioniert auch so! (KeyPreview des Forms ist auf True?)
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight
  Mit Zitat antworten Zitat
Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
 
Delphi XE2 Professional
 
#6

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 16:59
ah Danke!!!


KeyPreview hat gefehlt!!!

Danke Danke Danke! Ich seid Gold wert!
  Mit Zitat antworten Zitat
Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.027 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#7

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 17:00
Hmm, ohne KeyPreview dürfte es auch nicht ohne PageControl funktioniert haben...
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight
  Mit Zitat antworten Zitat
Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#8

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 17:01
Zitat von Helmi:
sharky, kannst du mal kurz bitte ein kleines projekt zusammenstellen und es mi schicken?...
Da ist es:
Angehängte Dateien
Dateityp: zip enter-tab.zip (3,6 KB, 6x aufgerufen)
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat
Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#9

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 17:02
Zitat von Stevie:
Hmm, ohne KeyPreview dürfte es auch nicht ohne PageControl funktioniert haben...
Genau darum habe ich Helmi danach überhaupt nicht erst gefragt
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat
Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
 
Delphi XE2 Professional
 
#10

Re: mit der Enter-Taste in Edits einen Tab simulieren

  Alt 11. Okt 2004, 17:02
ja - vermutlich!

ach ja - in einem anderen Programm von mir hab ich die Edits auf der Form direkt, hab von dem auch den Code rauskopiert

hab aber nicht an KeyPreview gedacht und in dem anderen Programm danach geschaut!!

trotzdem Danke!
  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:10 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz