comparar do tedit.text

[gonza_619]

bien ahora el problema es que el campo "ctrlconcepto" es integer y en esta parte de asignacion max:= Query1.FieldByName('maximo').AsString
no permite integer sino .string y .value. se que si lo denomino .value ahi que pasarlo al tipo q quiero. como seria?

Código Delphi [-]
query1.SQL.Clear;
query1.sql.text:= 'Select max(ctrlconcepto) as maximo from cobranzas where alucurso =IntToStr( x ) and concepto=IntToStr(dbedit9.text)' ;
query1.Active:=true;
max:= Query1.FieldByName('maximo').AsString;

asi como esta me tira error supongo porq max es integer, bien lo declare integer

max:= inttostr(query1.fieldbyname('maximo').value);

digo ya que el campo "maximo" es integer

[[Caral]]

Hola

Código Delphi [-]
query1.SQL.Clear;
query1.sql.text:= 'Select max(ctrlconcepto) as maximo from cobranzas where alucurso =  '+ IntToStr( x )+'  and concepto = '+ IntToStr(dbedit9.text) ;
query1.Active:=true;
max:= Query1.FieldByName('maximo').Value;

Saludos

[gonza_619]

me tira error de capability not suported.
que qiere decir cuando pongo al final .value?
quizas sea algo en la consulta pero el error me lo marca en la asignacion al MAX
no me tira error en la ocnsulta:

Código Delphi [-]
query1.sql.text:= 'Select max(ctrlconcepto) as maximo from cobranzas  where alucurso =IntToStr( x ) and concepto=IntToStr(dbedit9.text)' ;

[[Caral]]

Hola
La variable max que es ????
Saludos

[gonza_619]

la variable max es integer pero al parecer es en la cinsulta de esta manera funciona

Código Delphi [-]
query1.sql.text:= 'Select max(ctrlconcepto) as maximo from cobranzas where alucurso ='+IntToStr( x )

pero al tomar 2 campos como referencia ya no, es que el otro cmapo necesito agregarlo depues ese campo es tambien integer, sino tendre que pasarlo a un variable X como hice antes

strtoint(dbedit11.text)

Código Delphi [-]
query1.sql.text:= 'Select max(ctrlconcepto) as maximo from cobranzas where alucurso ='+IntToStr( x )  and conceptoctrl = strtoint(dbedit11.text)

aca nose si esta bien

[[Caral]]

Hola

Código Delphi [-]
query1.SQL.Clear;
query1.sql.text:= 'Select max(ctrlconcepto) as maximo from cobranzas where alucurso =  :uno  and concepto = :dos';
Query1.Params[0].Value:= IntToStr( x );
Query1.Params[1].Value:= dbedit9.text;
query1.Active:=true;
max:= Query1.Fields[0].Value;

Saludos

[gonza_619]

bueno me da error de type missmatch in expression.
bien es que resulta tengo que hacer un control

tablaxx
cmapo1 campo2 campo3
1 1 1
1 1 2
1 2 1

como veras si en campo 2 cambia , tambien tiene q cambiar campo3
si cambia campo2 entonces cambia campo3 = 1
si campo2 sigue con el mismo valor(1) entonces campo2 sera 2, si campo2 sigue (1), campo3 cambia =3 y asi.
ahora si campo2 cambia a(2) entonce campo3 vuelve a=1

por eso en la consulta referencio los campos campo1 y campo2,

BIEN AHORA PROBE ASI: SEGUN LO ENTENDI ANTERIORMENTE

query1.sql.text:= 'Select max(ctrlconcepto) as maximo from cobranzas where alucurso ='+IntToStr( x ) 'and concepto='+inttostr(dbedit2.text);

DEJANDO AFUERA LOS INTOSTR Y ME DICE MISSING OPERATOR OR SEMICOLON
ANTES DE ESTA PARTE +inttostr(dbedit2.text);

[ecfisa]

Empezado por gonza_619

me tira error de capability not suported.
que qiere decir cuando pongo al final .value?
quizas sea algo en la consulta pero el error me lo marca en la asignacion al MAX
no me tira error en la ocnsulta:

Hola gonza.
Ya en otro post que hiciste te conteste que esto:

Código Delphi [-]
query1.sql.text:= 'Select max(ctrlconcepto) as maximo from cobranzas  where alucurso =IntToStr( x ) and concepto=IntToStr(dbedit9.text)' ;

no va a funcionar.

IntToStr no es una sentencia SQL, tenés que sacar a IntToStr fuera de las comillas...

Saludos.