QReport i drukowanie z MySQL

0

Hej,

Mam tabele mysql (obsługiwaną z Zeosa) i do tego 1 forme z qreport, a 2 z editem do wpisania nr dokumentu do wydruku.

Na tej formie, gdzie mam edita chce dać sterowanie qreportem na n formie, robie to tak:

Query := 'SELECT * FROM av_faktury where nrdok =Edit1.text ';
Data.qrfaktury.Sql.Clear;
Data.qrfaktury.Sql.Add(Query);
Data.qrfaktury.Open;
print_fakt.QRSubDetail1.DataSet:= Data.qrfaktury;
print_fakt.QRDBText1.DataSet:= Data.qrfaktury;
print_fakt.QRDBText1.DataField:='nazwatow';
print_fakt.QuickRep1.Print;

najpierw pobieram z mysql odpowiednie zapytanie, a potem chce podstawić pod Qreport... wszystko niby działa, drukuje się -tylko nie wypełnia formularza danymi na wydruku...:/

Wie ktoś może o co chodzi??

0

Moim zdanie źle skonstrułowane zapytanie
jest
Query := 'SELECT * FROM av_faktury where nrdok =Edit1.text ';
czili filtruje nrdok="Edit!.text" czyli z takim textem a chyba nie o to Ci chodziło
powinno być
Query := 'SELECT * FROM av_faktury where nrdok ='+Edit1.text '+ ';
no i oczywiście kawałek kodu który sprawdza poprawność wpisu w Edit1 zeby nie było filtrowania po "ala ma kota"

0

w delphi potrzebna jest jeszcze funkcja sqla zwana parambyname, która spowoduje że wybrana zostanie wartość edita, powinno to wyglądać mniej więcej tak:

query1.sql.add('select * from tabela where parametr=:par);
qyery1.parambyname('par').value:=edit.text

przydziela ona zmienną par w sql'u zmienną z edita.

pozdr!
s-serwis.pl

1 użytkowników online, w tym zalogowanych: 0, gości: 1