Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Caption und Pfad für ShellExecute aus .INI lesen

  Alt 10. Mär 2006, 19:47
Viel hast du ja noch nicht. Der Komponentenname als Abschnitt in der Ini-Datei wäre eine Möglichkeit:

Code:
[Button1]
Caption=&Go
ExeFile=c:\datei.exe
Im Programm musst du die Unit IniFiles einbinden:

Delphi-Quellcode:
uses
  IniFiles;

var
  ini: TMemIniFile;
  iniFileName, exeFileName: TFileName;

begin
  iniFileName := ChangeFileExt(ParamStr(0), '.ini');
  ini := TMemIniFile.Create(iniFileName);
  exeFileName := ini.ReadString('Button1', 'ExeFile', '');
  with Button1 do
    Caption := ini.ReadString(Name, 'Caption', '');

  // falls du Änderungen an der INI-Datei gemacht hast,
  // dann solltest du diese zurückschreiben:
  ini.UpdateFile;

  ini.Free;
end;
Die Umwandlung des String in einen PChar ist dann nur noch eine kleine Hürde:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Application.Handle, 'open', PChar(exeFileName),
    nil, nil, SW_NORMAL);
Das ist das Handwerkszeug - du solltest es an deine Bedürfnisse anpassen können.

Grüße vom marabu
  Mit Zitat antworten Zitat