Problem mit S: Selection

[freak4fun]

Hallo kann mir einer sagen was das ist?

Delphi-Quellcode:

var    
S: Selection; // <-- Kennt mein Delphi net 
  
...    
S :=Word.Selection;    
S.TypeText('Here is some text');    
S.TypeParagraph;    
S.TypeParagraph;    
S.TypeText('And there was a blank line.');

Ich habs von hier.

[Marcel Gascoyne]

Ich nehme an das dies ein Objekt aus Winword ist. Du hast wahrscheinlich die entsprechende Unit für Dein Office nicht eingebunden, daher kennt Delphi das nicht.

Gruß,
Marcel

[freak4fun]

So weit ich das verstehe hast du recht.

Ich hab es jetzt so gemacht:

Weil S: Selection nicht geht und S dann einfach nur Word.Selction zugewiesen wird hab ich das S halt direct durch Word.Selection ersetzt. Ist ja auch logisch.
Aber ich kann das Word.Selection nicht mit "with" aufrufen.

Delphi-Quellcode:

with Word.Selection do begin // <-- Fehler: Record, object or class type required
  TypeText('Hallo!');
end;

mfg
freak

[shmia]

Du kannst späte Bindung über die IDispatch Schnittstelle benützen:

Delphi-Quellcode:

var    
S: OleVariant;  // <=====
...    
S :=Word.Selection;    
S.TypeText('Here is some text');    
S.TypeParagraph;    
S.TypeParagraph;    
S.TypeText('And there was a blank line.');

Die With-Anweisung kann natürlich nicht funktionieren, da bei später Bindung der Delphi
Kompiler keine Ahnung hat, was sich hinter OleVariant versteckt.
Die Zeile

Code:

S.TypeText('Here is some text');

verursacht im Hintergrund folgendes:
* dein Programm fragt WinWord, nach der Nummer der Funktion TypeText
* Word antwortet mit der Nummer der Funktion und den möglichen Parametern
* dein Programm sendet die Nummer der Funktion + Parameter an Word
* Word führt die Funktion aus und gibt evtl. einen Rückgabewert zurück