Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Grolle,
29. Jun 2005
Danke! Funktioniert jetzt (beide Varianten).
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Grolle,
29. Jun 2005
Aus Delphi 3 für Profis. Kann natürlich sein, dass ich mich vertippt habe. :oops:
Ja war natürlich so. Schon dämlich, wenn man nicht mal abschreiben kann :wall:
Danke...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Grolle,
28. Jun 2005
Hi!
Ja du hast recht. Habe den Try except Block jetzt nach oben gepackt.
Bekomme jetzt allerdings die Fehlermeldung, dass die
Methode Active nicht vom Automationsobjekt unterstützt wird. Liegt
das an der WordVersion(XP)?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Grolle,
28. Jun 2005
Hi!
Mit folgendem Code möchte ich einen Briefkopf in Word erstellen:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
try
word := CreateOleObject('Word.Application');
word.visible := true;
word.Documents.Add;
if word.ActiveWindow.View.SplitSpecial <> 0 then word.ActiveWindow.Panes.Close;