1. Du könntest dem .Tag des Buttons einen eindeutigen Wert zuweisen und falls du ein OnClick Ereignis für
den Button hast dieses dort abfragen.
2. Was generelles zu deiner Function: warum nutzt du für den Kopf Kommentar nicht XMLDOC?
Dann könntest du dir diesen Kommentar an jeder beliebigen Aufrufstelle beim Drüberfahren mit
der Maus über den Aufruf anzeigen lassen.
Hier ein Beispiel, die einzelnen "Templates" kann man mittels Strg-J einfügen (Strg-J drücken, dann den ersten Buchstaben des gewünschten Templates)
Delphi-Quellcode:
/// <summary>
/// Eigene MessageBox mit selbst definierbaren Buttons anzeigen
/// </summary>
/// <param name="sMsg">
/// Anzuzeigende Nachricht
/// </param>
// für alle anderen Params auch jeweils <param name="...
function MyMessageDlg(sMsg: String; aDlgTypt: TMsgDlgType; aButtons: TMsgDlgButtons; sArrCaption: array of String; sDlgCaption: String): Integer;
// *****************************************************************************************************************************************
3. Bei Funktions/Methodendefinitionen mit String Parametern solltest du vor jeden String Parameter const schreiben.
Das macht den Aufruf ein wenig performanter. Geht natürlich nur für parameter die innerhalb der Funtkion/Methode
nicht verändert werden.
Grüße
TurboMagic