¿asignaciones de registro así por la cara?
Eso siempre lo confundo, no sé si es una asignación de punteros, o delphi hace una copia entera de la memoria
.
Yo te diría que usaras un TObjectList, y tu registro lo convirtieras en un TObject, es mucho más fácil de usar y parecido a delphi.
Código Delphi
[-]
Type TComun = Class(TObject)
public
Nombre : String;
Tarea : String;
Modulo : String;
Rutina : String;
Tipo : String;
Scope : String;
end;
Para crear la lista:
var
lista :TObjectList;
procedure TForm1.Button1Click(Sender:TObject);
begin
lista := TObjectList.Create(True); end;
procedure TForm1.btnAnadirObjetoClick(sender:Tobject);
var c:Tcomun
begin
c:= TComun.Create;
c.nombre := edit1.text;
c.tarea := edit2.text;
...
lista.Add(c); end;
procedure TForm1.BtnBuscarElPrimero(Sender:Tobject);
var uno:Tcomun;
begin
if Assigned(lista) then if Lista.Count > 0 then uno := TComun(lista[0]);
ShowMessage(uno.nombre);
end;
procedure TForm1.FormClose(....);
begin
lista.free;
end;
Edito: ahora recien veo el comentario de
bpesoj, totalmente válido y muy muy similar a lo que yo expongo (ya que también uso punteros pero camuflados).
Ya tienes 2 opciones para elegir
Saludos