[poli-smen]

Сообщение от denISRU

Неа.. как раз так и было, но проблема в том что этих...э...занюханных январей и т.п. много, и DBtext из квик репорта так же берет первое значение, а оно в основном пустое.., то есть как бы я проблему то решил вот этим циклом, он перебирает значения, находит положительное или отрицательное (не нулевое) и впихивает в лейбл, а надо бы к нему еще сделать так, чтобы он еще и когда цикл не находит значений не скандалил.. - тоесть ну..вот как бы еще иф вписать, я вообще хотел что то вроде

Код:

если - значение в базе не ноль то присваиваем лейблу значение из базы, иначе присваиваем лейблу значение  - "пробел"

только вот при оформлении этого у меня почему то хрень какая то выползает, ну так же - значения не отбираются.. или все равно стакается программа на пустых полях..

Всё равно цикл делать не нужно - Quick Report сам делает цикл по всем записям. Если нужна специфическая обработка отдельных записей, то у каждого элемента есть обработчик события OnPrint - вот в этом событии и пиши своё условие:

Код:

procedure TReportForm.qrLabel441Print(sender: TObject; var Value: String);
begin
  if DataModule2.ADOQ28.FieldByName('xxxx').IsNull
    then Value := ' '
    else Value := DataModule2.ADOQ28.FieldByName('xxxx').AsString;
end;