Record zur Laufzeit auflösen ....

[gbl]

Ich habe hier ein spezielles Problem das sich wie folgt darstellt.

Ich etwickle gerade eine CGI Anwendung(en). Innerhalb dieser Anwendung gibt es viele Punkte an denen Daten in einem File gespeichert werden. Diese Schnittstelle stammt von einem Dritthersteller.

Ich möchte nun eine einzige PROCEDURE verwenden welche alle möglichen Daten übergeben bekommt und dann speichern kann.
Diese Daten werden in einem RECORD verpackt. Dieses RECORD sieht pro Anwendung anders aus.

Beispiel:

Delphi-Quellcode:

TRECORD1 = record
    value1: byte;
    value2: integer;
    value3: string;
  end;

TRECORD2 = record
    value1: string;
    value2: longint;
    value3: TDateTime;
  end;

erreichen möchte ich:

Delphi-Quellcode:

procedure SAVE(daten: DATENTYP?);
begin
  { Dieser Code kann den DATENTYP und dessen Struktur erkennen }
  // Send Parameter to API
end;

hoffe das somit alles klar ist.