|
Registriert seit: 4. Mär 2007
Ort: Sponheim
1.021 Beiträge
Delphi XE2 Professional
|
AW: TUpDown
14. Feb 2012, 22:23
Z.B. mit if-Anweisung:
Delphi-Quellcode:
if Button = btNext then
begin
// Code für btNext
end else
begin
// Code für btPrev
end;
oder mit Case
Code:
case Button of
btNext: begin
// Code für btNext
end;
btPrev: begin
// Code für btPrev
end;
end;
Marc 9 von 10 Stimmen in meinem Kopf sagen ich bin nicht verrückt, die 10. summt die Melodie von Tetris... | Wenn das die Lösung ist, dann hätte ich gerne mein Problem zurück! |  engbarth.es
|