Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by malo,
4. Jun 2005
In diesem Fall unnötig, stimmt. Aber es kann manchmal sein, dass bei solchen Abfragen beide Fälle gleichzeitig auftreten. Damit nicht mehrere Routingen ausgeführt werden, lass ich das else häufig einfach drin. Man sollte evtl. nur überdenken, welche von den Routinen dann höhere Priorätit hat (wenn beide Fälle auftreten, was wichtiger ist auszuführen).
Ist auch ein wenig eine Frage des...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by malo,
4. Jun 2005
Kleiner Fehler im Code: Der else-Zweig wird bei JEDER anderen Maustaste ausgelöst. Also auch bei der mittleren oder bei einer anderen Maustaste (manche Mäuse haben ja auch an den Seiten Tasten). Also lieber so:
procedure TForm1.ListView1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if button = mbright then
showmessage('rechts')
else if...