Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Contenido de un DBGrid en MultiSelect (https://www.clubdelphi.com/foros/showthread.php?t=62896)

mrnovice 20-01-2009 15:50:58

Contenido de un DBGrid en MultiSelect
 
saludos, gracias por el apoyo nuevamente jojo, mi duda es como puedo mostrar el contenido de un jvDBGrid en modo multiselect supongo que tiene las mismas herencias que un DBGrid pero no he logrado lo único que creía era JvDBGrid1.selectedRows.items[i];
pero no me ha funcionado no he encontrado la propieda correcta por favor ayuda
lo que debería mostrame son los renglones seleccionados gracias.

Caro 20-01-2009 16:10:03

Hola mrnovice, revisa si hay la propiedad Options->dgMultiSelect si hay debes colocarla a True.

Saluditos

mrnovice 20-01-2009 16:12:23

si lo tengo seleccionada
 
esa propiedad ya está activada

Caro 20-01-2009 16:21:49

Hola de nuevo, si lo tienes activado entonces debería funcionarte el MultiSelect, osea seleccionar varios registros de tu DBGrid ya sea con "Ctrol+Click" o con "Shift+las flechas".

Saluditos

mrnovice 20-01-2009 16:39:27

este si eso si me funciona pero
 
lo que necesito ver el contenido con formato string, algo así como
ej
A
B
C
D
E
Seleccionados A,C,E
var Str;
Str:='A,C,E'
osea con código nosé como explicarlo, haber creo hay una propiedad SelectedField, o algo así el chist es ver el TField de los renglones seleccionados ;)

Caro 20-01-2009 17:00:19

Cita:

Empezado por mrnovice (Mensaje 335140)
lo que necesito ver el contenido con formato string, algo así como
ej
A
B
C
D
E
Seleccionados A,C,E
var Str;
Str:='A,C,E'
osea con código nosé como explicarlo, haber creo hay una propiedad SelectedField, o algo así el chist es ver el TField de los renglones seleccionados ;)

Hola de nuevo, ahora si te entiendo, has esta prueba:

Código Delphi [-]

   Campos := Query.FieldCount-1;
   for i:=0 to DBGrid1.SelectedRows.Count-1 DO
   begin
       Query.GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));
       for j := 0 to Campos do
       begin
          if (j>0) then cadena:=cadena+', ';
          cadena:=cadena+Query.Fields[j].AsString;
       end;
       cadena:= cadena+#13;
   end;
   showmessage(cadena);

Hace un rato he leído muy rapido, es por eso que no he entendido bien tu pregunta.

Saluditos

Caro 20-01-2009 17:05:19

También puedes preguntar si hay filas seleccionadas.

Código Delphi [-]
 if DBGrid1.SelectedRows.Count>0 then
  begin
   ...........
   ...........
  end;

Saluditos

mrnovice 20-01-2009 18:34:30

Gracias muchisimas gracias
 
es lo que andaba buscando saluditossssssss ujuussss pasatela bien ;)


La franja horaria es GMT +2. Ahora son las 14:41:39.

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