Nro de fila en TDBGrid

[[Crandel]]

Empezado por lucasarts_18

necesito algo que me devuelva el numero de fila seleccionada.

usa SelectedRows.Count

[lucasarts_18]

Hola:

Gracias por responder amigos, he solucionadop el asunto del total de filas, sólo me falta el de la fila actual del cursor, probé con table1.recno y me devuelve -1.
Espero otra manito.

Gracias.

[vtdeleon]

Saludos

Empezado por lucasarts_18

Hola:

Gracias por responder amigos, he solucionadop el asunto del total de filas, sólo me falta el de la fila actual del cursor, probé con table1.recno y me devuelve -1.
Espero otra manito.

Gracias.

Probe con

Código Delphi [-]
ShowMessage(inttostr(table1.RecNo));

y resulto de maravillas. Chequea bien tu tabla o codigo.

[lucasarts_18]

Hola :

Sigo igual que antes.
showmessage(inttostr(QryDetallePed.RecNo)); (Es un TQuery por sí acaso)
y no me resulta, sigue devolviendome -1

Según la ayuda de delphi:

Indicates the active record in the dataset.
property RecNo: Integer;
Description
As implemented in TDataSet, the value of RecNo is always -1 (Ojo aquí). Ordinarily an application does not access RecNo at the TDataSet level. Instead a re-implemented RecNo property in a descendant class such as TTable is accessed. RecNo provides a fallback property for derived datasets that do not support record numbers.

¿Qué diablos será ?

Nos vemos.
Saludos.

[[Crandel]]

Ordinarily an application does not access RecNo at the TDataSet level. Instead a re-implemented RecNo property in a descendant class such as TTable is accessed

En tu misma cita escribiste que RecNo se reimplementa en sus decendientes, como es el caso del TQuery. Asi que no deberia haber problema.

Asegurate de estar realmente preguntado al query correcto, que este abierto en el momento de la pregunta o algún error de esos siempre tontos que nos hacen perder semanas (a todos nos pasa).

Revisa bien en el código como si fuera la primera vez que lo lees, sin presuponer nada

Suerte.

[vtdeleon]

Saludos

Esto debe funcionar:

Código Delphi [-]
 procedure Cualquiera;
begin
  query1.close;
  query1.sql.clear;
  query1.sql.add('Select * from tablaX');//cualquier tabla o Base de datos
  query1.open;
  ShowMessage(inttostr(query1.RecNo));
end;

Suerte

[lucasarts_18]

Hola:

éste es mi código:

Código Delphi [-]
  
with QryDetallePed do
   begin
      Close;
      SQL.Clear;
      SQL.Add ('Select * from Pedido_Detalle');
      SQL.Add ('Where Nro_Pedido = ' + edtNumPed.text);
      Open;
      showmessage(inttostr(QryDetallePed.RecNo));
   end;

-1

Saludos.