Forum: Programmieren allgemein
by blondervolker,
5. Dez 2011
Hab`s schnell selber gebastelt.
Es geht ganz einfach und ist genial und ohne Fehlermeldung:
procedure TForm1.ffnen1Click(Sender: TObject);
var
chm: string;
begin
ShellExecute(Application.Handle,'open','Help.chm',nil,nil,SW_SHOW);
end;
Forum: Programmieren allgemein
by blondervolker,
5. Dez 2011
Hallo und wieder ein Problem...
Hab versucht meine Hilfe erstellt mit "Fasthelp" als Help.chm
einzubinden,aber geht nicht.
Muss ich dazu eine Extra Komponente importieren?:oops:
procedure TForm1.ffnen1Click(Sender: TObject);
begin
Application.HelpFile := ExtractFilePath(ParamStr(0))+'Help.chm';
end;