Deutsches Lazarusforum

Danccce

Hallo zusammen,

ich versuche mit VTV eine Tabelle darzustellen.
Dabei soll die letzte Spalte in jeder Zeile ein Button sein, den der Benutzer drücken kann und den ich dann natürlich auch abfangen muss.
Hat jemand einen Tipp, wie ich dies am günstigsten bewerkstellige, bzw gibt es vielleicht schon ...

Danccce

Danke, ich werd die Corba-Version verwenden...

Besten Gruß
Marc

Danccce

Hallo zusammen,

ich habe ein Interface und zwei (mehrere) abgeleitet Klassen geschrieben:

IMyInterface = interface(IUnknown)
['{CC79C31B-E310-4D22-BCE9-0A8E88DA917E}']
procedure doSomething;
end;

TTestClass1 = Class(TInterfacedObject, IMyInterface)
public
procedure doSomething;
end ...

Danccce

So das erste Problem gelöst:

vMSWord.ActivePrinter :=ShortString(Printer.Printers[formularPrinter]);
funktioniert !!!

Jedoch setzt ActiveProinter ja den Standard-Drucker um. Besser wäre es nur das aktive Dokument auf einem anderen Drucker zu drucken. Laut iNet sollte dafür etwas wie :

vMSWord ...

Danccce

Hab noch etwas experimentiert ...

Code: Alles auswählen

vMSWord.ActivePrinter := 'PDFCreator';   // Funktioniert

aber

Code: Alles auswählen

printerString:='PDFCreator';
vMSWord.ActivePrinter :=printerString;  //Funktioniert nicht

Welche String-Conversion kann ich verwenden????

Danccce

Das gibt den Drucker genauso aus wie der im String: Printer.Printers[formularPrinter]
Daher sehe ich den die falsche Schreibweise nicht...

Wäre es besser

Code: Alles auswählen

vMSWord.WordBasic.FilePrintSetup(Printer:='PDFCreator', _DoNotSetAsSysDefault:=1);

zu verwenden? Funktioniert jedoch genauso wenig

Danccce

Hallo zusammen,

ich möchte gerne ein Word-Dokument per OLE drucken (Word 2007). Das funktioniert soweit ganz gut. Jedoch gelingt es mir nicht den Drucker um zu stellen:

procedure TForm1.Button1Click(Sender: TObject);
var
vMSWord : variant;
vWDocument : variant;
FileName : OLEVariant;
begin ...

Danccce

Copy and paste- Fehler.... Sorry, hab es gerade erst gesehen, dass ich beim Auspacken den include-Unterordner nicht mit kopiert habe...

Sorry und besten Dank
Marc

Danccce

Hallo zusammen,

ich habe ein Problem "Virtual TreeView" zu instrallieren.

Laut Wiki soll man "LCL Extensions 0.5" installieren, welches ich unter "http://code.google.com/p/luipack/downloads/list" als "lclextensions-0.5.1.zip" heruntergeladen habe.
Beim Neu-Kompilieren der IDE erhalte ich nun die ...

Danccce

Gelöst:

Man nehme die Unit CommCtrl und kann dann z.B.

Code: Alles auswählen

CommCtrl.ListView_SetIconSpacing(listview1.Handle, 40,40);

verwenden.
Sorry dass ich das nicht früher selbst herausgefunden habe.

Besten Gruß
Marc

Danccce

Hallo zusammen,

ich habe eine Frage zu ListView's :

Ich nutze ein Listview im ViewStyle vsIcon und habe eine passende ImageList (Bildgröße 40x40 Pixel).
Wenn ich nun Items in die Listview einfüge ist der Abstand zwischen Ihnen für meine Anwendung viel zu groß.
Gibt es eine Möglichkeit diesen ...

Danccce

Hallo zusammen,

ich habe ein kleines Problem mit Frames. Ich habe folgende Konfiguration:

Form1
- Frame1_1
- - Button1
- - Frame2_1

D.h. die Form1 enthält das Frame1_1, welches einen Button und das Frame2_1 enthält.
wenn man auf den Button drückt soll das Frame2_1 verschwinden.

Leider ...

Danccce

Hat sich erledigt!
:roll:

Da es ein ein OLE aufruf war durfte kein String sondern OLEVariant übergeben werden:

var
vMSWord, vWDocument, vWText : OLEVariant;
FileName : OLEVariant;
begin
try
FileName:=extractfilepath(ParamStr(0))+'\Templates\Lastschrift.docx';
vMSWord := CreateOleObject ...

Danccce

Hallo zusammen,

ich habe ein kleines Problem ein File zu öffnen:

So gehts:
vWDocument := vMSWord.Documents.Open('C:\Dokumente und Einstellungen\Office\Eigene Dateien\Quittungsdrucker\Templates\Quittung.docx');

So leider nicht:
FileName:='C:\Dokumente und Einstellungen\Office\Eigene Dateien ...

Danccce

Danke für die Antwort. Hatte ich schon ausprobiert.
Trotzdem wird der Label nicht verändert, so als ob der Button-Druck gar nicht abgefangen würde.

Deutsches Lazarusforum

Die Suche ergab 16 Treffer

VirtualTreeView: Buttons in einer Spalte

Re: ObjectList und Interfaces

[gelöst] ObjectList und Interfaces

Re: Word-Dokument per OLE drucken

Re: Word-Dokument per OLE drucken

Re: Word-Dokument per OLE drucken

Word-Dokument per OLE drucken

Re: VirtualTreeView installieren

VirtualTreeView installieren

Re: IconAbstand in ListView

IconAbstand in ListView

Frame in Frame

Re: File open Problem

File open Problem

Re: ButtonPanel: Ok-Button abfangen