22-10-2017, 07:00 PM
Boa noite!!!
Teria alguma fonte de informações dos parametros e como usar o icriteria?
Teria alguma fonte de informações dos parametros e como usar o icriteria?
Manual ICriteria
|
22-10-2017, 07:00 PM
Boa noite!!!
Teria alguma fonte de informações dos parametros e como usar o icriteria?
22-10-2017, 07:37 PM
22-10-2017, 07:56 PM
(22-10-2017, 07:37 PM)Isaque Pinheiro Escreveu: no link http://www.thedelphigeek.com/2015/04/run...ilder.html Muito obrigado!!!
22-11-2017, 09:28 PM
(22-10-2017, 07:37 PM)Isaque Pinheiro Escreveu: no link http://www.thedelphigeek.com/2015/04/run...ilder.html Mais uma dúvida para eu usar select um pouco mais elaborados eu tenho que adiocionar esse projeto do link na minha aplicação ou o ORMbr já tem dentro dele e já posso usar?
23-11-2017, 05:25 AM
(22-11-2017, 09:28 PM)Osiel Gomes Escreveu:(22-10-2017, 07:37 PM)Isaque Pinheiro Escreveu: no link http://www.thedelphigeek.com/2015/04/run...ilder.html Já está no ORMBr, use as units da pasta ..\ORMBr\Source\Criteria, esse link acima é só para demonstrar o uso.
05-10-2018, 03:07 PM
Meu primeiro sql:
function TMESA.GetMesa(const ACodigo: string): IDBResultSet; var LWhere: string; begin LWhere := ' 1=1 '; if not StrVazia(ACodigo) then begin LWhere := LWhere + ' and CODIGO = ' + ACodigo; end; Result := TCriteria.New.SetConnection(iBDConexao).SQL( CreateCriteria.Select.Column('CODIGO').Column('DESCRICAO'). From('MESA'). Where(LWhere)).AsResultSet; end; Mesa := TMESA.Create; try with Mesa.GetMesa('') do begin DataSet.First; while not DataSet.Eof do begin Atencao(FieldByName('DESCRICAO').AsString); DataSet.Next; end; end; finally FreeAndNil(Mesa); end;
07-10-2018, 08:30 AM
(Esta mensagem foi modificada pela última vez a: 07-10-2018, 08:39 AM por Isaque Pinheiro.)
(05-10-2018, 03:07 PM)samuca.ti@hotmail.com Escreveu: Meu primeiro sql: Assim: Delphi
|
« Mais Antigo | Mais Recente »
|