Buscar en una estructura record

[[escafandra]]

Empezado por fcios

y hay alguna forma de buscar siempre en el primer campo ?

Si sabes el tipo, si.

Mira este ejemplo:

Código Delphi [-]
type
TR = record
  UNO: integer;
  DOS: CHAR;
end;


procedure TForm1.Button1Click(Sender: TObject);
var
  V: TR;
begin
  V.UNO:= 1;
  Edit1.Text:= IntToStr(PInteger(@V)^);
end;

Saludos.