+ 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