Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #11  
Antiguo 01-06-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Fijate si así te sirve, la función devuelve el nombre de la última localidad del TDataSet:
Código Delphi [-]
function GetLastLocName(ADataSet: TDataSet): string;
var
  BM: TBookMarkStr;
begin
  BM:= ADataSet.Bookmark;
  ADataSet.DisableControls;
  ADataSet.Last;
  Result:= ADataSet.FieldByName('Localidad').AsString;
  ADataSet.EnableControls;
  ADataSet.Bookmark:= BM;
end;

Ejemplo de llamada:
Código Delphi [-]
   ShowMessage(GetLastLocName(DBGrid1.DataSource.DataSet));

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 01-06-2011 a las 06:57:44. Razón: Agregar Ejemplo de llamada
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Ayuda con dbgrid estebanx OOP 4 14-09-2012 14:32:23
Ayuda con DBgrid abdielalej C++ Builder 3 02-04-2010 19:52:01
ayuda con el DBGrid metroyd SQL 8 15-10-2007 23:34:39
Ayuda con un DBGrid Luciano M. SQL 5 02-11-2005 21:29:41
Ayuda con Dbgrid y D7 incansable OOP 1 30-12-2004 19:36:06


La franja horaria es GMT +2. Ahora son las 19:04:58.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi