Trapicheando con tablas ;)

[acrophet]

Vale, igual no he expresado bien mi situacion.
El numero no es es un numero relacionado con el cliente realmente, sino con una tarjeta.
Todos los que tienen el mismo numero deben ir en la misma tarjeta(Titular-beneficiario).
No tengo problemas de diseño, quiza no explique bien el caso

[kinobi]

Empezado por acrophet

No tengo problemas de diseño, quiza no explique bien el caso

Puede ser que no tengas problemas de diseño, pero sí parece que esa base de datos sí tiene problemas de normalización, al menos por los comentarios de tu último mensaje.

Saludos.

[kinobi]

Olvida mi mensaje anterior.
He vuelto a leer todo el hilo y yo estaba equivocado, ahora sí he conseguido entenderlo.

Disculpas y saludos.

[acrophet]

Bueno, al fin alguien ha entendido lo que quiero!!! jajaja
En fin, espero que alguien me pueda dar unas indicaciones de como hacer lo que me propongo.

Un saludo y gracias a todos por la colaboracion.

[jachguate]

habia publicado una respuesta en este espacio, pero envista de tu mensaje anterior, prefiero eliminarla. Si te llegó por correo, pos tenes suerte de verla. Que lamentable expresión de exigencia!

Mejor lee la guia de estilo.

hasta luego.

[sanxpue]

Si que te metiste en un lio je je je

En realidad no es tan dificil.. por que no piensas que el mundo tiene 3 dimensiones y que la computadora la vemos de dos... weno pues usemos la segunda dimension de la compu.. osease a lo ancho.. je je je (ya se recibire criticas por el comentario, pero ahi va la idea..)

Primero no debes de crear tantos campos como nombres alla...por que puede tronar, puede tronar.. creo que su limite es de 255 campos..(si estoy mal ahi me avizan)

Por que no mejor creas un campo Blob...

Ordenas primero tu tabla x Numero de tarjeta y nombre para que salgan ordenaditos

despues con un simple While... hagamoslo..
pones un TListBox

Procedure....
Var
  Tar : Integer;
Begin
  Tar := 0;
  ListBox1.Items.Clear;
  While Not Tabla.EoF Do
  Begin
     //aqui supongo que tu nombre del campo es NumTar ahi lo cambias
     If Tabla.FieldByname('NumTar').AsInteger <> Tar Then
     Begin
        //Primero metemos
        If Tar <> 0 Then //por que luego luego va a querer meter y no podemos
                               //dejar eso por que esta vacio
        Begin
           //metemos a tu base
           TablaTemp.Insert;
           TablaTemp.fieldByName('NumTar').AsInteger := Tar;
           TablaTem.FieldByName('Nombres').Assign(ListBox1.Items);
           TablaTem.Post;
           ListBox1.Items.Clear;
           Tar := Tabla.FieldByname('NumTar').AsInteger;
        End
        Else
           Tar := Tabla.FieldByname('NumTar').AsInteger;
        ListBox1.Items.Add(Tabla.FieldByname('Nombre_Cliente').AsString);  
     End;
     Tabla.Next;
  End;
  //Ahora aqui volvemos a meter por los sobrantes...
  TablaTemp.Insert;
  TablaTemp.fieldByName('NumTar').AsInteger := Tar;
  TablaTem.FieldByName('Nombres').Assign(ListBox1.Items);
  TablaTem.Post;
End;

Ya obtenemos lo que quisiste.. ahora que le quieres hacer...
Tus datos ahora los veras asi...

Campo Nombres
30      Juan Charrasqueado
         Chuchita la Bolsearon
         Juana
         Perengana
         Sultana (Como iba a faltar la famosisima)
35      Petra
         Chana
         El Peyote Asesino
.
.
.

Nada mas faltaria que les quieras hacer esos campos....pero ya puedes hacerles los que quieras

[acrophet]

Empezado por jachguate

habia publicado una respuesta en este espacio, pero envista de tu mensaje anterior, prefiero eliminarla. Si te llegó por correo, pos tenes suerte de verla. Que lamentable expresión de exigencia!

Mejor lee la guia de estilo.

hasta luego.

Oye, no se por que dices eso de lo de que lamentable expresion de exigencia, no era esa mi intencion para nada, si lo has entendido asi, lo siento. Yo siempre procuro dar las gracias por la ayuda recibida, porque se que se pierde tiempo en responder y ayudar. En ningun momento pretendo exigir nada.
No creo que me haya comportado mal con nadie, asi como nadie se ha comportado mal conmigo. De todas formas si te has sentido molestado, pido discultas.

Un saludo, y de nuevo gracias por la ayuda prestada.

[sanxpue]

compañero acrophet... te sirvio la idea o que pasion je

[acrophet]

Perdona tio, olvide responder a tu post
Pues la verdad es que con ese codigo que me pusiste, no sale lo que yo queria, pero vamos, tampoco esperaba eso. Te puedo decir que me ha ayudado muchisimo ya que gracias a tu explicacion y codigo, estoy afinando cada vez mas y estoy cerca de conseguir lo que busco.
Mil gracias compañero!!!!

Un saludo.

[sanxpue]

Y que es lo que te falta...

si ya tienes las cadenas que quieres..weno si quieres cuentame que es lo que te falta...