Problema busqueda varios campos

[bosster_018]

Tal como lo menciona Al_Gonzalez....

Como ejemplo con un DateTimePicker y un Boton

en el boton pones el formatDateTime:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  fecha : string;
begin
  fecha:= FormatDateTime('yyyy/mm/dd',DateTimePicker1.Date);
  ShowMessage(fecha);
end;

Con esto le das el formato que quieras a tu fecha, muy bueno para trabajar con base de datos por ejemplo MYsql y Sql

Saludos!

[elrodrix]

Empezado por bosster_018

Tal como lo menciona Al_Gonzalez....

Como ejemplo con un DateTimePicker y un Boton

en el boton pones el formatDateTime:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  fecha : string;
begin
  fecha:= FormatDateTime('yyyy/mm/dd',DateTimePicker1.Date);
  ShowMessage(fecha);
end;

Con esto le das el formato que quieras a tu fecha, muy bueno para trabajar con base de datos por ejemplo MYsql y Sql

Saludos!

Hoy voy a probar como dices y comento ... ahora con LOCATE de ADOTable como podria mandar como parametro para consultar por 3 campos?

[Casimiro Notevi]

Empezado por bosster_018

Con esto le das el formato que quieras a tu fecha, muy bueno para trabajar con base de datos por ejemplo MYsql y Sql

SQL no es ninguna base de datos, es un lenguaje.

[cancun]

Hola


La función Locate sería así:

if Table1.Locate('Campo1;Campo2;Campo3',VarArrayOf([Valor1,Valoe2,Valor3]),[]) then //Encontrado

Para hacer una condición por varios campos se usa el operador AND

where Campo1='xxxx' And Campo2>10 And Campo3=200 And Campo4<>'1'

Para las fechas puedes usar esta función

function AnsiQuotedDate(Fecha:TDateTime):String;
begin
  Result:=''''+IntToStr(Year(Fecha))+'-'+IntToStr(Month(Fecha))+'-'+IntToStr(Day(Fecha))+'''';
end;

y la llamas de este modo

  Tabla1.ParamByName('Fecha').AsDate:=AnsiQuotedDate(DateTimePicker1.Date);

  Query1.SQL.Strings[3]:='Where Fecha='+AnsiQuotedDate(DateTimePicker1.Date);

Bueno espero te sirva de algo esta información

Saludos

[bosster_018]

Empezado por Casimiro Notevi

SQL no es ninguna base de datos, es un lenguaje.

No me di cuenta de mi error....

Ahora que leo de nuevo las definiciones de cada palabra... Lo diré de nuevo:

Bueno para utilizar con gestores de Base de datos MySQL y SQL server

Ya que el SQL es un lenguaje de consulta estructurado....

Cada vez aprendo más.... Gracias a ustedes...

Saludos!

[Casimiro Notevi]

Empezado por bosster_018

No me di cuenta de mi error.... Bueno para utilizar con gestores de Base de datos MySQL y SQL server

Te refieres a MS Sql server, ¿verdad?

[[Al González]]

Empezado por Casimiro Notevi

Te refieres a MS Sql server, ¿verdad?

O quizá se refiere a Firebird SQL Server, que también es popular.

[Casimiro Notevi]

Empezado por Al González

O quizá se refiere a Firebird SQL Server, que también es popular.

El departamento de marketing de Microsoft hizo una buena jugada en poner a su RDBMS de nombre "SQL Server", así todas las personas que no entienden mucho del tema piensan que "SQL server" es el de microsoft, y que el resto son "otra cosa".

Si llegan a ser fabricantes de coches, le ponen de nombre "coche" y así todo el mundo asocia "coche" con el MS coche
Y los demás no son "coches", son vehículos a motor con 4 ruedas y volante, de nombre ford, renault, nissan, etc. pero el auténtico "coche" es el de microsoft, el "MS coche"

[roman]

Pues eso tiene sus antecedentes históricos desde que Estados Unidos decidió llamarse así, Estados Unidos de América. De esa forma identifican todo el continente con ellos, como se desprende de la doctrina Monroe.

No es de extrañar que sus empresas hagan cosas similares.

// Saludos