各位Delphi先進: 小弟我利用了物件盤上server選項中的TWordDocument這個物件 其物件其中有一個方法為SaveAs 程序如下 procedure SaveAs(var FileName: OleVariant; var FileFormat: OleVariant); 然後FileFormat這參數的說明如下: FileFormat Optional Variant. The format in which the document is saved. Can be one of the following WdSaveFormat constants: wdFormatDocument, wdFormatDOSText, wdFormatDOSTextLineBreaks, wdFormatRTF, wdFormatTemplate, wdFormatText, wdFormatTextLineBreaks, or wdFormatUnicodeText. To save a document in another format, specify the appropriate value for the SaveFormat property of the FileConverter object. 請問 如果我要把FileFormat存成wdFormatText 或是其他種類的格式 我該怎樣使用且定義這參數阿?? 因為我不知道參數為OleVariant要怎樣使用 各位先盡如果懂得 可以舉個例子讓我了解怎樣使用嗎 謝謝大家

我沒用過，不過你可以試試這樣成不成 :

procedure TForm1.Button1Click(Sender: TObject);
var
  ov1,ov2 : OLEVariant;
begin
  ov1 := 'abc.txt';
  ov2 := wdFormatText;
  W.SaveAs(ov1,ov2);
end;

這裏有幾個實用的sample 讓您參考看看 http://www.blong.com/Conferences/DCon99/VCLSourcery/VCLSourcery.htm http://www.blong.com/Conferences/DCon99/FAQs/FAQs.htm http://www.delphi-treff.de/content/tutorials/automationkurs/index.php4?kat=3 發表人 - turboted 於 2003/06/04 11:49:22