Thema: Delphi TUpDown

Einzelnen Beitrag anzeigen

Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#7
  Alt 30. Jun 2003, 23:12
funktioniert zwar, aber sobald ich es einmal gemacht hab, kommt sogar die Message "hoch", sobald ich auf den schliessen button, ins fenster etc klicke, also nicht nur bei der scrollbar hmm...hatte das so:

Delphi-Quellcode:
procedure TForm1.UpDown1ChangingEx(Sender: TObject;
  var AllowChange: Boolean; NewValue: Smallint;
  Direction: TUpDownDirection);
begin
  if Direction = updUp then
  begin
    showmessage('hoch');
  end
  else if Direction = upddown then
  begin
    showmessage('runter');
  end;
end;
Mario
  Mit Zitat antworten Zitat