Erhalte falsches modalResult

[Ydobon]

Angesichts deiner Fragen wäre es interessant zu erfahren, was du tatsächlich vor hast.
In procedure TForm1.Button1Click(Sender: TObject); ist Sender immer die auslösende Komponente, auch wenn du diese Ereignisbehandlungsprozedur zusätzlich noch Button2, Button3,..,ButtonX zuweisen würdest. (Sender as TButton).Caption ergibt dann z.B. die Beschriftung des jeweils gedrückten Buttons. Oder die Eigenschaft "Tag" der Komponenten, eine beliebige Ganzzahl, die man zu solchen Identifizierungen auch nutzen kann.