Return ohne Ergebnis

hansa · Beiträge: 3079 Erhaltene Danke: 9

Hi,

im OnKeyPress erhalte ich beim Drücken von Return keinerlei Ergebnis. Wenn ich allerdings eine ShowMessge benutze, dann geht alles wie es soll. Bis auf die überflüssige ShowMessage. Wie kann das sein ?

_________________
Gruß
Hansa

AXMD · Verfasst: So 15.05.05 19:44

hansa hat folgendes geschrieben:

Hi,

im OnKeyPress erhalte ich beim Drücken von Return keinerlei Ergebnis. Wenn ich allerdings eine ShowMessge benutze, dann geht alles wie es soll. Bis auf die überflüssige ShowMessage. Wie kann das sein ?

Versteh nicht, was du meinst. Wo und wie verwendest du ShowMessage und was geht dann?

AXMD

hansa · Beiträge: 3079 Erhaltene Danke: 9

Ist die ShowMessage da raus :

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

procedure TfrmRegis.edKuNrExit(Sender: TObject);
begin
  inherited;
showmessage (BoolToStr (Sonderkunde,true));
  if SonderKunde then begin

dann geht nichts mehr wie es soll !

_________________
Gruß
Hansa

AXMD · Verfasst: So 15.05.05 19:51

hansa hat folgendes geschrieben:

Ist die ShowMessage da raus :

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

procedure TfrmRegis.edKuNrExit(Sender: TObject);
begin
  inherited;
showmessage (BoolToStr (Sonderkunde,true));
  if SonderKunde then begin

dann geht nichts mehr wie es soll !

Wozu das inherited? Du solltest btw. deine Variablen und Typen etwas erklären...

AXMD

hansa · Beiträge: 3079 Erhaltene Danke: 9

Das inherited tut nichts zur Sache !

_________________
Gruß
Hansa

Sprint · Beiträge: 849

Ist es so schwer ein Beispiel zu schreiben, das jeder nachvollziehen kann?

_________________
Ciao, Sprint.

hansa · Beiträge: 3079 Erhaltene Danke: 9

Beispiel gefällig ? Gut, ein weiteres. Ist zwar dasselbe aber egal.

Man nehme eine Form, lege ein Edit da drauf und macht wie beschrieben ein Edit-OnKeypress :

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

procedure TfrmRegis.edKuNrKeyPress(Sender: TObject; var Key: Char);
begin
showmessage ('bla'); 
  case key of
    #13 : begin

Ist das Showmessage weg, dann geht nichts.

_________________
Gruß
Hansa

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme