Guest User

Untitled

a guest
Aug 17th, 2014
220
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ZQuery1.sql.text :=
  2. 'select * from C000004 where filial = '' + frmprincipal.spanel1.caption + ''';
  3. ZQuery1.open;
  4. ZQuery1.execsql;
  5.  
  6. DBEdit2.text := ZQuery1.fieldbyname('SEQ_CTE').asstring;
  7. eserie.text := ZQuery1.fieldbyname('SERIE_CTE').asstring;
  8.  
  9. showmessage(ZQuery1.fieldbyname('SERIE_CTE').asstring);
  10.  
  11. ZQuery1.close;
RAW Paste Data