Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 03-01-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.098
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
¿Se puede asignar una cadena de texto a un record?

Hola, me explico con un ejemplo para que sea más comprensible:
Tengo un record con todos los campos de texto.

Código Delphi [-]
TregFicha = record
  RFcampo1 : string[12];
  RFcampo2 : string[40];
  RFcampo3 : string[15];
end;

rLinFicha : TregFicha;

Desde un fichero de texto voy leyendo líneas y asignándola para almacenar después en una base de datos:

Código Delphi [-]
var
  cLinea : string;
  F : TextFile;
begin
  // se abre el fichero de texto y se va leyendo
  // y ahora a leer...
  while not eof(F) do
  begin
    rLinFicha.RFcampo1 := Trim( Copy(  cLinea,   1,  12 ) );
    rLinFicha.RFcampo2 := Trim( Copy(  cLinea,  13,  40 ) );
    rLinFicha.RFcampo3 := Trim( Copy(  cLinea,  53,  15 ) );
    //
    // etc..... con todos los campos
    //
  end;

Entonces mi pregunta es si se puede hacer algo así como:

Código Delphi [-]
rLinFicha := cLinea;
Assign(rLinFicha,cLinea);
etc.

Se trata de ahorrar tiempo y principalmente de no tener que estar calculando donde empieza un campo y el siguiente, para evitar errores.
Además por si cambia la longitud de un campo, o se añada otro en medio, o se borra alguno, etc. no habría que tocar nada, porque de esta
forma hay que recalcular todo a mano.

Gracias por vuestros comentarios.
Saludos.
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
ibdataset no me deja asignar cadena... ronimaxh Firebird e Interbase 1 16-10-2010 17:33:43
Asignar 'array property' con record.elemento yapt OOP 6 13-05-2010 21:16:05
¿Existe función para asignar a una cadena el resultado de concatenarla con otra? noob Varios 8 13-02-2009 19:34:53
Tipos Strings: no puedo asignar una cadena de mas de 255 caracteres bataola Varios 2 29-06-2007 18:34:37
Asignar una cadena al QRDBtext lirio Impresión 2 03-06-2003 21:30:15


La franja horaria es GMT +2. Ahora son las 22:34:11.


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
Copyright 1996-2007 Club Delphi