so gehts
Delphi-Quellcode:
{$R 101.res} //Den Compiler anweisen die Datei "101.res" einzubinden (du kannst für deine .res-Datei bzw .rc-Datei auch jeden beliebigen anderen Namen nehmen, der spielt für den quelltext keine Rolle
procedure TForm1.Button1Click(Sender: TObject);
var
MsgParams: TMsgBoxParams;
begin
MsgParams.cbSize:=SizeOf(TMsgBoxParams);
MsgParams.hwndOwner:=Self.Handle;
MsgParams.hInstance:=HInstance; //in Diesem Fall: HInstance = MainInstance
MsgParams.lpszText:='Lobby Broadcaster'+ #13 +'Version: 1.1.0'+ #13 +''+ #13 +'Copyright © 2000 - 2005 by Me.'+ #13 +'All Rights Reserved.';
MsgParams.lpszCaption:='About Product';
MsgParams.dwStyle:=MB_OK or MB_USERICON;
MsgParams.lpszIcon:=MAKEINTRESOURCE(101);;
MsgParams.dwContextHelpId:=0;
MsgParams.lpfnMsgBoxCallback:=nil;
MsgParams.dwLanguageId:=0;
MessageBoxIndirect(MsgParams);
end;
im übrigen kannst du -r auch weglassen (wird nicht mehr unterstützt)