Word in Delphi

rego · Beiträge: 37

hi,

folgendes: ich will eine Datei (name Texte.deu oder texte.eng) mit einem button in einem word dokument öffnen. mein delphi spuckt mir keine hilfe über WordDocument1 aus und ich komm mal wieder nicht weiter :/

(Delphi5)

über schnelle hilfe wär ich dankbar

rego

Moderiert von Christian S.: Topic aus CLX / Delphi Language (Object-Pascal) verschoben am Fr 26.08.2005 um 17:38

rego · Beiträge: 37

es scheint nicht zu gehen, weil ich kein word97 drauf habe
weiss einer ob ich stattdessen auch das in windows integrierte word öffnen kann ?

LigH · Beiträge: 239 Win98SE, Win2000SP4 D7

Windows hat kein Word integriert.

Was du eventuell meinst (WordPad), ist ein Rich-Text-Editor, der zusätzlich noch Word-6-Dokumente importieren kann. Eine RichEdit-Komponente bietet Delphi an, und wie man damit umgeht, wird alle paar Wochen immer wieder mal aufs neue erklärt für die, die die Boardsuche nicht bedienen können.

rego · Beiträge: 37

Eben diese kann ich nicht bedienen, denn wenn ich auf den schönen "Suche" Button klicke, öffnet sich ein noch schöneres Fenster mit dem Inhalt, dass diese Seite nicht aufrufbar ist. Grund daran ist das noch noch schönere Programm der Firma, welches bestimmte Internetseiten sperrt und leider auch diesen Suchbutton. Warum ? Keine Ahnung.

rego · Beiträge: 37

ich glaube du hast mich nicht ganz verstanden.

Ich möchte, dass Delphi einen Editor per Knopfdruck öffnet, in dem sich eine Datei öffnet, die von Delphi erstellt wurde durch einen anderen Knopfdruck. Dieser Editor soll die Fähigkeit besitzen, diese Datei ändern und neu abspeichern zu koennen.

Es geht mir nicht darum sie anzuzeigen.

P.S. Ahnung von Richedit habe ich absolut gar keine

Harry M. · Beiträge: 754 Win 2000, XP D2005

Na einfach mit ShellExecute, WinExec usw die Datei aufrufen und als Parameter die Datei+Path angeben die geöffnet werden soll. Habe ich zwar jetzt nicht getestet solle aber gehen.

_________________
Gruß Harry
Et spes me per dies sine te ducat et amor me ferat, si dolor spem tollit.

rego · Beiträge: 37

öhm, wie ?

Land-Gull · Beiträge: 51 SuSe 9.2, WIN XP D7 Enter

Hi,

probiers mal mit WinExec('Wordpad.exe',SW_Show) dann öffnet sich allerdings kein Dokument drin.
Daher würd ich dir

markieren

Delphi-Quelltext

1:	ShellExecute(0,nil,'wordpad.exe','Der Pfad deiner Datei',nil,SW_Show);

empfehlen.

Denk drann bei uses aber noch shellApi hinzuzufügen.

rego · Beiträge: 37

nur noch ein klitzekleines Problem:
wie wandel ich string in PChar um ?

P.S. danke

Fabian W. · Beiträge: 1766 Win 7 D7 PE

PChar();

rego · Beiträge: 37

geht irgendwie nicht :/

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

procedure TForm1.Button3Click(Sender: TObject);
begin
 // Application.CreateForm(TEditForm, EditForm);
 // MessageDlg('Bitte Sprache auswählen', mtInformation,[mbOk], 0);
  TempStr1 := 'C:\SPSTXTVW\'+ 'TEXTE.' + Suffix(Sprache);
 // EditForm.Open(TempStr1);
 // EditForm.ShowModal;
 PChar(TempStr1);
 ShellExecute(0,nil,'wordpad.exe',TempStr1,nil,SW_Show);


end;

so schaut das aus aber kommt fehlermeldung:
Anweisung erforderlich aber Ausdruck vom Typ 'PChar' gefunden {Zeile 8} &
Inkompatible Typen String und PChar {Zeile 9}

jakobwenzel · Verfasst: Mo 29.08.05 11:26

PChar ist eine Funktion. Sie erwartet einen String als Parameter und gibt einenPChar zurück. Also musst du schreiben:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

procedure TForm1.Button3Click(Sender: TObject);
begin
 // Application.CreateForm(TEditForm, EditForm);
 // MessageDlg('Bitte Sprache auswählen', mtInformation,[mbOk], 0);
  TempStr1 := 'C:\SPSTXTVW\'+ 'TEXTE.' + Suffix(Sprache);
 // EditForm.Open(TempStr1);
 // EditForm.ShowModal;
 ShellExecute(0,nil,'wordpad.exe',PChar(TempStr1),nil,SW_Show);


end;

_________________
I thought what I'd do was, I'd pretend I was one of those deaf-mutes.

MrSaint · Verfasst: Mo 29.08.05 11:32

PChar ist keine Funktion! Es ist ein TypeCast!
Siehe Motzis Tutorial auf www.manuel-poeter.de für mehr Infos

MrSaint

_________________
"people knew how to write small, efficient programs [...], a skill that has subsequently been lost"
Andrew S. Tanenbaum - Modern Operating Systems

rego · Beiträge: 37

Herzlichsten Dank an alle die mir immer helfen, ihr seids Spitze

und so langsam bekomm ich spass an delphi, obwohl ich hier für anfänger killerprogramme bearbeiten muss. Ma sehen vielleicht gibts für mich newbie doch noch chancen irgendwann das programm zu beherrschen

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme