Forum: Programmieren allgemein
by Hansa,
22. Feb 2012
Ich habe die Grafik ûber den bildschirm gejagt. Im Kreis, die Font.Size rauf 200 und zurück etc. Da war kein Fehler. Bei omata war der ja direkt zu sehen. Warum Omaha jetzt einen Sandkasten kindergarten-streit anzettelt, wer weiss? :mrgreen:
Forum: Programmieren allgemein
by Hansa,
22. Feb 2012
Um was handelt es sich da konkret ? Rummosern nützt jedenfalls nichts.
Forum: Programmieren allgemein
by Hansa,
22. Feb 2012
ach ja ? Geht das wenigstens im Gegensatz zu anderen Beispielen? :mrgreen:
Forum: Programmieren allgemein
by Hansa,
21. Feb 2012
Soll das so was werden wie im Anhang (ist vorerst nur lauffähige Exe)?
Der komplette Quelltext lässt sich wohl nur von mir compilieren (da ist zuviel eigenes drin und ich müsste das alles rausschmeissen, falls nötig).
Forum: Programmieren allgemein
by Hansa,
20. Feb 2012
Nun, dann sind sie eben nicht zu gebrauchen. Werde morgen ein komplettes Beispiel zusammenbauen, welches auch funktioniert und nicht nur compiliert. 8-)
Forum: Programmieren allgemein
by Hansa,
20. Feb 2012
Allerdings ändert sich am Effekt nichts. Eventuell 10mal den Button drücken. Glaube 8 reicht aber. :mrgreen:
Forum: Programmieren allgemein
by Hansa,
20. Feb 2012
Das von mir vorher geschriebene war etwas entstellt. Zumindest geht damit nichts mit C+P und nur Bezeichner ändern. :stupid:
Das hier :
procedure TForm1.Lade (Nr : integer);
var bstr : string;
begin
try
bstr := (Liste.Items as Tbstr).bstr;
qrPreview.Show;
Forum: Programmieren allgemein
by Hansa,
18. Feb 2012
procedure TForm1.Lade (Nr : integer);
var bstr : string;
begin
Try
** *BStr := ?? Hier aus Datei
** *qrPreview.Show;
** *qr1.Prepare; Qr1= tquickrep
** *qr1.QRPrinter.Load(bstr);
** *qr1.QRPrinter.Preview;
**finally