co jest nie tak

ZE
  • Rejestracja: dni
  • Ostatnio: dni
0

w procedurze formcreate

combobox1.text:='';
combobox1.items.add('Pz - Przyjęcie do magazynu');
combobox1.items.add('PzC - Przyjęcie do magazynu');
combobox1.items.add('Pw - Przychód wewnętrzny');
combobox1.items.add('Pt - Przychód wewnętrzny');
combobox1.enabled:=false;
co:=combobox1.text;
Dane.nrdokM.filtered:=false;
Dane.nrdokM.filter:='typdok='+#39+co+#39+' and '+'oddzial='+#39+start.memo1.Lines[0]+#39 ;
Dane.nrdokM.filtered:=true;
if dane.nrdokM.recordcount=0 then labelededit1.Text:='1';
if dane.nrdokM.recordcount<>0 then labelededit1.Text:=inttostr((dane.nrdokM.fields[1].asinteger)+1);

natomiast w combobox1change
nie
wywala błąd

raise exception classEDBEngineError with message 'Operation not applicable'

Deti
  • Rejestracja: dni
  • Ostatnio: dni
0

Może byś opisał co to za klasy te dane itd...

ZE
  • Rejestracja: dni
  • Ostatnio: dni
0

znalazłem

co:=combobox1.text;

gdzie
co: string;

ZE
  • Rejestracja: dni
  • Ostatnio: dni
0

problem plega na tym

Dane.nrdokM.filter:='oddzial='+#39+start.memo1.Lines[0]+#39+' and '+'typdok='+#39+edit1.text+#39 gdzie zawartość wybranego componentu combobox jest parametrem filtrowania tabeli sysbase

pomocy

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.