Suchergebnisse

Aber selstverständlich, stehe für fragn gerne zur verfügung. Der kluge Mensch weiß nicht ales er weiß nur wo es steht Gottsei Dank gibt es die Hilfe habse jetzt richtig zu schätzen gelernt ein wort und die Hilfe sucht dir das richtige raus

So hier der Quelltext zum Quickreport vielleicht es euch mal [code:1] var QuickReport2: TQuickReport2; implementation uses Unit1; {$R *.DFM} procedure TQuickReport2.QuickRep1BeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean); begin Z:=0; end; //da hier keine Datenbank verwendet wird müssen die Daten aus der listview eingelesen werden procedure TQuickReport2.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean); begin Moredata:=True; Moredata:=z<Form1.ListView1.Items.Count -1; inc…

So bis jetzt hat alles geklappt vielen dank nochmal Habe nur noch problem habe jetzt einenen Quickreport erstellt und das ein wenig hübschgemacht doch da teil mag nicht richtig drucken woran kann da liegen?? Druckt nur beim eingestelten standart Drucker. Ist das ne sache die mit den Treibern unter Windows zusmammenhängt?

Danke

Ja danke für den Ansatz mit Listbox aber der Hilft mir nicht weiter da mein Listview ja mehrere Spalten hat (12 Stück). Habe mir gesacht einen Stream zu benutzen? Für eine Listview wäre das doch wohl am besten??? [code:1] procedure TForm1.BitBtn7Click(Sender: TObject); var Stream1:TfileStream; begin Stream1:= TFileStream.Create('museum.txt', fmopenread or fmShareDenyNone); Stream1.ReadComponentRes(ListView1); Stream1.Free;[/code:1] Das ist doch dann so richtig?

Hab doch noch ein Problem beim erstellen also das was isch einfüge ist verschoben fängt nicht in der erstel Spalte an mit einfügen sondern in der zweiten und bei der zurückübertragen in die EditKomponente fängt er an und Bringt mir bezeichner fehler kann mir da einer elfen??? [code:1]procedure TForm1.BitBtn1Click(Sender: TObject); begin close; end; procedure TForm1.BitBtn5Click(Sender: TObject); begin Listview1.Clear; end; procedure TForm1.BitBtn3Click(Sender: TObject); var i:Integer; begin for …

So die Übertrageung stimmt jetzt stell dann noch mal den code rein ABer hielfe Bräuhte ich noch beim speichern und laden wolte den Inhalt in einer Datei Speichern und daraus wieder laden mit Open und Save dialog ist das so möglich ??? Kenn das von Listboxen.

Naja code kann mans nicht nennen hier ist mal das Projekt an sich ielecht hilft das ja weiter. [code:1] procedure TForm1.BitBtn3Click(Sender: TObject); begin ListView1.DeleteSelected; end; procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem; Selected: Boolean); begin with Item do begin Edit10.Text:= SubItems.Strings[0]; Edit1.Text:= SubItems.Strings[1]; Edit2.Text:= SubItems.Strings[2]; Edit3.Text:= SubItems.Strings[3]; Edit4.Text:= SubItems.Strings[4]; Edit5.Text:= SubItems.St…

Hallo, erstens ich kenne die F1 taste hat aber nichts gebracht, bin verzweifeld und ratlos und ein n00b aber das macht nicht nun zum Problem. Ich habe ein Listview, 9Editfelder eine MemoKomponente. Die Listview ist in 10 Spalten geteilt (für jedes der edit und memo komponenten eine) und ich muss irgendwie Die Daten (Texte) aus den Komponenten an die Listview übergben mit einem klick auf Knöpfchen und das will nich gehen weiß nicht wie ich das anstellen soll. Zum schluss solls so was wie ne Daten…