Hogyan kell megnyitni a kész szót Delphi
hogyan lehet megnyitni a kész szót Delphi
Kérem, segítsen mégegyszer.
Megadtam a kódot: # XA0;
eljárás TForm1.RadioButton1Click (Sender: TObject);
# XA0; var Szó: variáns;
kezdődik
ha RadioButton1.Checked = igaz, akkor
Szó: = CreateOleObject ( "Word.Application");
Word.Documents.Open ( "L: \ DIPLOMA \ test.doc");
végén;
és ő ad indításkor nem találja a fájlt. Nem értem, mi a baj
Miért van az, ez a programozás?
eljárás DoOpenWordDoc (fájlnév: string);
var
# XA0; w: Variant;
kezdődik
# XA0; w: = CreateOleObject ( "Word.Application"); # XA0; // # XA0;<- сюда бряк и смотреть, что в FN пришло
# XA0; w.Documents.Open (fájlnév);
végén;
eljárás TForm1.RadioButton1Click (Sender: TObject);
kezdődik
# XA0, ha RadioButton1.Checked majd
# XA0; # XA0, azzal TOpenDialog.Create (nulla) do
# XA0; # XA0, próbálja
# XA0; # XA0; # XA0, ha Execute majd
# XA0; # XA0; # XA0; # XA0; DoOpenWordDoc (fájlnév);
# XA0; # XA0, végül
# XA0; # XA0; # XA0; szabad,
# XA0; # XA0; end;
végén;
> "L: \ DIPLOMA \ test.doc"
> Külső merevlemez \ DIPLOMA \ érettségi projekt
Ön nem tartotta ezt a mappát
> Nem találja a fájlt
Delphi ott FileExists funkciót, ami jó lenne használni, hogy megpróbálja megnyitni, és vannak mindenféle szemetet párbeszédablakban írja be a TOpenDialog, amely lehetővé teszi, hogy válassza ki a fájlt, és automatikusan létrehoz egy elérési útvonalát.
és a kérdés a rossz fiúk identitás értelme gondolkodni.
Memória: 0.72 MB
Idő: 0,02 c