+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 4 su 4

Da listbox a stampante

  1. #1
    Pistone non  in linea Novello
    Post
    1
    Like Inviati  
    0
    Like Ricevuti  
    0
    Salve a tutti,

    il mio dilemma questo:dovrei effettuare la ricerca in un file e metterne il risultato in una listbox per poi stampare il contenuto di essa.
    La ricerca e l'inserimento nella listbox sono riuscito a farlo senza troppi inceppi, il problema mandare il contenuto alla stampante per poi ovviamente stamparlo.
    Come faccio?? Creo un file excel o altro ?? Aiutatemi non mi ero mai cimentato in quest'impresa!

    (scusate sono nuovo del forum e non essendone molto pratico avr certamente commesso qualche errore)

  2. #2
    L'avatar di _alka_
    _alka_ non  in linea Very Important Person
    Post
    1,399
    Like Inviati  
    0
    Like Ricevuti  
    21
    Hai valutato l'utilizzo di un tool di reporting qualsiasi in Delphi, tipo FastReport, RAVE Reports, QuickReports, ...
    In questo caso, hai molta documentazione ed esempi a disposizione, se fai una ricerca su Google.

    In alternativa, puoi sempre usare l'oggetto Printer (unit Printers) per inviare direttamente gli elementi della ListBox alla stampante.

    Comunque sia, non manderei in stampa la ListBox in quanto tale, se questo che intendevi fare, perch chiaramente stamperesti il suo aspetto grafico e non vedresti sulla carta gli elementi che sono nascosti (a meno che tu non sia sicuro che il numero non ecceda l'area visibile, ma lascerei perdere comunque questa strada).

    Ciao!
    ℹ️ Leggi di pi su _alka_ ...

  3. #3
    L'avatar di +m+
    +m+
    +m+ non  in linea Scribacchino
    Post
    922
    Like Inviati  
    0
    Like Ricevuti  
    0
    Il modo pi veloce e triste usare assignprn su un textfile.
    Eventualmente setta printer.canvas.font per avere un font vagamente leggibile, e
    poi cicla sugli items con writeln().

    E' un approccio stile anni 80, ma funziona

  4. #4
    Axon non  in linea Novello
    Post
    36
    Like Inviati  
    0
    Like Ricevuti  
    0
    LA cosa pi banale per stampare il listbox la seguente:

    uses
      ...
      Printers,
      ...
    procedure ProvaStampa;
    var
    F: TextFile;
    i: integer;
    begin
      AssignPrn(F); { assegna il file di testo alla stampante }
     try
      Rewrite(F); { Occorre usare Rewrite dopo aver usato AssignPrn } 
      for i:=0 to listbox1.items.count-1 do
         WriteLn(F, listbox1.items[i]);
     finally
       CloseFile(F);
     end;
    end;
    

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Risposte: 9
    Ultimo Post: 05-05-2016, 08:33
  2. Risposte: 2
    Ultimo Post: 30-01-2014, 12:04
  3. set stampante
    Da rocco.mtg nel forum Presentazioni e saluti
    Risposte: 1
    Ultimo Post: 12-01-2009, 18:01
  4. Risposte: 2
    Ultimo Post: 21-07-2008, 13:18
  5. sp2 e stampante hp
    Da Giullare31 nel forum Microsoft Windows
    Risposte: 3
    Ultimo Post: 14-02-2005, 17:29