Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Mar 29 Abr, 2003 6:29 pm Asunto: |
|
|
si lo que deseas es, buscar una clave, para no repetir el codigo, buen te lo pongo en pseudo codigo
en el edit1 inserta el contenido a busar
despues realizar una busqueda de la siguiente manera dentro del evento OnKeypressed
| Código: |
if(Key==VK_RETURN){
Key=0;
if (DataModule1->TPrestador->Locate("ClaveMatricula", Edit1->Text, TLocateOptions())){
// codigo si lo encuentras
}else{
//codigo si no lo encuentras
Application->MessageBox("no existe");
}
}
|
DataModule1-> // pues eso, el data module
TPrestador-> // Tabla donde lo bas a buscar
Locate(
"ClaveMatricula", // campo de la base a buscar
Edit1->Text, // lo que vas a buscar
TLocateOptions() // como lo vas a buscar
){
Espero te sirva, y no tengas problemas, por si no es lo que buscas, bueno espero me puedas dar, mayores referencias... _________________
 |
|