Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Xeno-Sebi,
26. Mär 2004
ahja ist logisch:
wenn du mit space die meldung schließt kommt sie nciht nochmal, oda???
das liegt daran, dass das(oder der???) spinedit imma noch markiert ist. Der dialog wird mit keydown geschlossen. Aber "Tf_PokerServer.se_PortKeyUp" ist keyup! also reicht eine taste für beides. also musst du das so machen:
if(Key=13)then
begin
Button1.setfocus;
b_StarServerClick(Sender);
end;
end;...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Xeno-Sebi,
26. Mär 2004
yo stimmt. wie wärs, wenn du mal den code postest?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Xeno-Sebi,
26. Mär 2004
Was für ne Fehlermeldung ist das denn? Schon mal mit try...except probiert?
also ich hab mal ein simples prog nachgebaut:
1 edit; 1 spinedit; 1 button(default)
procedure TForm1.SpinEdit1KeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if(Key=13)then
Button1.Click;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Xeno-Sebi,
26. Mär 2004
hm...das ist zwar nicht eine antwort auf deine frage, aber vielleicht kannst du bei einem onKeyUp ereignis des spinedits sagen:
if(Key=13)then
Button1.Click();
damit umgehst du das prob