wie kann ich bestimmte (text) dateien öffnen

[kleiner Unwissender]

also entweder bin ich zu blöd zum suchen oder es wurde noch nirgens hier beschrieben.

ich hab ein programm und eine "anleitungs.txt" im gleichen ordner wie die exe. jetzt möchte ich die gerne über das menü: hilfe -> anleitung öffnen können. (is schon alles vorbereitet ich weiß nur nich wie ich die datei öffnen kann) bis jetzt kommt da statt der datei nämlich nur ein messagedlg mit nem text der auf das file verweist, mann es also manuell öffnen soll, das find ich aber doof.

würd mich über hilfe wirklich freuen!

[arbu man]

shellexecute oder
hier

[kleiner Unwissender]

danke für die schnelle antwort!

[glkgereon]

kleiner tipp:

ich persönlich fände es schicker wenn die anleitung nicht mit notepad oder so geöffnet wird, sondern in deinem programm angezeigt wird.

Zum Beispiel eine Memo und dann Memo.Lines.LoadFromFile
oder eine ShowMessage/MessageBox (Text mittels einer TStringList holen)

[kleiner Unwissender]

is schon richtig, aber für showmessage is es zu lang (3 seiten)

das mit dem memo gefällt mir aber, danke für den tip!

[new32]

...oder memo + eigene Form sieht moch beser aus! :wink:

MfG NEW32!

[Kompon Ente]

Ich möchte in meinem Suchprogramm ebenfalls einbinden, dass man via Auswahl in der ListBox einen bestimmten Datensatz bzw. eine bestimmte Datei öffnen kann mit Notepad (egal, welches Format (*.exe, *.txt, *.php usw.)

Hier mein Code dafür..

Delphi-Quellcode:

ShellExecute(Application.Handle,'Open', PChar(FDatei),
    PChar('Parameter'),PChar('FPfad'),SW_SHOWNORMAL);

Irgendwie stimmt das aber net :?:

[new32]

Ich würd das sowieso mit createprocess machen:

Delphi-Quellcode:

procedure exec(p:string {dateiname} );
var si:Tstartupinfo;
    pi:tprocessinformation;
    pn:string;
begin
pn:='C:\WINNT\system32\notepad.exe';
createprocess(nil,
              pchar(pn+' '+p),
              nil,
              nil,
              false,
              windows.NORMAL_PRIORITY_CLASS,
              nil,
              nil,
              si,
              pi);
end;

MfG NEW32!

[new32]

//edit: aus versehen auf Zitat nich auf Ändern gedrückt. :mrgreen: