Autor Beitrag
juppinger
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 50



BeitragVerfasst: Mi 13.08.08 19:11 
Hallo,

ich habe Delphi 4. Darin gibt es einen SpinEdit Button unter "Beispiele".
Ich hätte gerne, dass beim Drücken der Eingabetaste eine Aktion ausgeführt wird.
OnKeyDown usw. passiert nix.

Hat jemand nen Tipp?

Danke,
jup
Marc.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1876
Erhaltene Danke: 129

Win 8.1, Xubuntu 15.10

BeitragVerfasst: Mi 13.08.08 19:30 
Wie schaut denn Dein bisheriger Code aus? ;) Unter Delphi7 funktioniert das jedenfalls problemlos.

Grüße,
Marc.
|M|Ich|Er|
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 34


Morfik Web OS, Delphi 6 EE
BeitragVerfasst: Mi 13.08.08 19:36 
mach doch ein popup menu auf die form und stell bei shortcuts = enter ein

_________________
Nase voll, *zensiert* schrumpft, 3 Tage wach, essen doof, schlafen doof ,3 Tage wach, banane in der birne, 3 Tage wach, bollerbuden dirndl, 3 Tage wach
Americanos City, C*cktails für 2 Euro!!!
Lannes
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2352
Erhaltene Danke: 4

Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
BeitragVerfasst: Mi 13.08.08 19:38 
Hallo,

in D3 keine probleme, also sollte es in D4 auch funktionieren.

_________________
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
juppinger Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 50



BeitragVerfasst: So 17.08.08 18:09 
Titel: Gelöst - klappt doch
Hi zusammen,

danke für die Antworten.
Klappt doch mit:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm39.SpinEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
//if (Key = ord(13)) then BitBtn2Click(sender); --> Geht auch
if Key = VK_RETURN then BitBtn2Click(sender);
end;

Thx,
jup

Moderiert von user profile iconNarses: Delphi-Tags hinzugefügt
ffgorcky
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 573

WIN XP/2000 & 7Prof (Familie:Win95,Win98)

BeitragVerfasst: Do 02.07.09 16:48 
Also ich hätte das ganze dann eher mit einem (Bit)Button gemacht, dem ich dann die Eigenschaft
ausblenden Delphi-Quelltext
1:
Button.Default := True;					

zugeordnet hätte...
...also so, wie zum Beispiel hier in diesem Thread im Beitrag von user profile iconalzaimar.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19314
Erhaltene Danke: 1747

W11 x64 (Chrome, Edge)
Delphi 11 Pro, Oxygene, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Do 02.07.09 16:56 
Also erstens: Wozu gräbst du den Thread wieder aus? :roll:
Und zweitens: Dann braucht man aber einen zusätzlichen Button und das passiert nicht nur, wenn man in der speziellen Komponente Enter drückt...
ffgorcky
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 573

WIN XP/2000 & 7Prof (Familie:Win95,Win98)

BeitragVerfasst: Do 02.07.09 16:59 
user profile iconjaenicke hat folgendes geschrieben Zum zitierten Posting springen:
Also erstens: Wozu gräbst du den Thread wieder aus? :roll:

Entschuldigung, ich habe nur gerade für das Thema Button in TWebBrowser "drücken" nach einem Verweis gesucht.