Zitat von
oldie:
Hi,
ich habe 80 Button auf einer Form.
Mit
Delphi-Quellcode:
with (FindComponent('Button'+ IntToStr(i))as TButton) do begin
SetFocus;
ButtonClick(Self); // funktioniert nicht
end;
kann ich jedem Button den Focus geben.
Wie kann ich aber den Sender auf den Button einstellen damit ein Tastendruck auf den Button erzeugt wird?
Gruß Oldie
Das liegt daran das du als Sender "Self" übergibst und nicht "FindComponent('Button'+ IntToStr(i))".
Wenn du Self als Sender angibst ist es logisch das der Sender dann auch Self ist.