allg. Fragen zu Records

[TheMiller]

Hi!

Ich habe angefangen, mich mit DLLs und Records zu befassen. Jetzt habe ich einige Fragen zu den Records.

zum beispiel:

(Wie) kann ich einzelne Records direkt ansprechen?
Sind Records alphabetisch geordert? Wenn nein, geht das?
oder
Wie kann ich mir ein Record bildlich vorstellen?

zum Beispiel wie eine ini-Datei?

Delphi-Quellcode:

[Record1]
Name=xxx
Adresse=xxx

Wäre euch für die Beantwortung dieser Fragen dankbar. Habe sie extra in einen Thread geschrieben, da es sich um allg. Fragen, so eine art FAQ handelt. evtl könnt ihr ja auch noch ein paar nachfragen ergänzen.

danke im Vorraus

[himitsu]

Nein, die sind nicht automatisch sortiert.
Die Reinfolge ist die, die auch bei der Recorddefinition verwendet wird.

Der Daten, die im Record gespeichert erden, stehen einfach in einer Reihe im Speicher.
Die Namen von Variable werden ja in Delphi nicht gespeichert.

Code:

Test: packed Record      Test: Record
  C: Byte;                 C: Byte;
  B: Word;                 B: Word;
  A: String;               A: String;
  D: Byte;                 D: Byte;
End;                     End;


Byte's   Was             Byte's   Was
1.       C               1.       C
2.-3.    B               2.-3.    frei
4.-7.    A               4.-5.    B
8.       D               6.-7.    frei
                         8.-11.   A
                         12.      D
                         13.-16.  frei

Vom String (AnsiString) steht nur der Zeiger auf den String im Record.
Der String selber steht dann an der im Zeiger angegebenen Position. (4 Byte Referenzzähler + 4 Byte Stringlänge + x Byte Stringdaten)

[Markus K.]

Hallo DJ-SPM,
der Datentyp Record stellt eine Möglichkeit dar, um eine logische Gruppe von unterschiedlichen Typen unter dem selben Namen zu sammeln.
Dabei sieht die allgemeine Syntax so aus:

Delphi-Quellcode:

<record name> = Record
      <Name{Feldname}> : <VariablenTyp>; {zum Beispiel Integer, String, etc.}
      <Name{Feldname}> : <VariablenTyp>;
end;

Man kann dabei soviele Felder verwenden, wie man möchte.
Nun mal ein Beispiel:

Delphi-Quellcode:

type
TMeinRecord = Record
     Nummer: Word;
     Name, Vorname, Adresse:String;
end;
var 
Daten:TMeinRecord;

Folgenderweise kann man auf die Felder des record zugreifen.

Delphi-Quellcode:

begin
Daten.Nummer:=...;
Daten.Name:=...;
...
end;

oder so

Delphi-Quellcode:

begin
with daten do
begin
     Nummer:=...;
     Name:=...;
     ...
end;

Hoffe das ich dir ein wenig helfen konnte.

Tschüß Markus

[TheMiller]

Joa, danke, damit konntet ihr mir schon ein bissl helfen.

Nur mal ein wenig expliziter, wenn ich mehrere Records habe, zum Beispiel

[Film1]
...

[Film2]
...

[Film3]
...

Wie kann ich die Filme einzeln ansprechen. Und woher weiß ich, was in den []-Klammern steht?

Also, "Film" ist jetzt nur so gewählt, da ich ein Beispiel einbringen wollte.

Wie kann ich z.B Film3 anzeigen, ohne, dass ich, wie in den meinsten Delphi-Büchern beschrieben, vor und zurück buttons einsetze?

Danke für eure bisherigen und evtl. noch folgenden Antworten

[Pseudemys Nelsoni]

Guck mal nach Verketteten listen...
achja und wenn du eine extravariable innerhalb des records für den filmname machst kannst du sie ja einfach abfragen um welchen film es sich handelt.

[TheMiller]

Hm danke,

kannst du mir das bitte mal an einem Beispeil erläutern? Raff das irgendwie net. Wäre cool


THX

[Pseudemys Nelsoni]

mach ich gleich, ich geh nur kurz für 40min weg, bis gleich

[TheMiller]

ok, danke!

[Luckie]

http://www.luckie-online.de/Downloads/

Hier gibt es eine Unit TTypedFiles die das alles in einer Klasse kapselt. Kannst dir ja mal den Source ankucken.

Ach so die Daten findest du wieder, da alle Rocords gleich groß sind, man muss also nur Zählen.

[Delphi-Noobie]

Wenn du 3 records hast also

Code:

Type Film1 = record
     irgendwas:string;
     irgendwas2:integer;
     irgendwas3:Boolean;
             end;
Type Film2 = record
     irgendwas4:string;
     irgendwas5:integer;
     irgendwas6:Boolean;
             end;
Type Film3 = record
     irgendwas7:string;
     irgendwas8:integer;
     irgendwas9:Boolean;
             end;

Dann machste zum Beispiel on Button click das:

Code:

procedure TForm1.Button1Click(Sender: TObject);
var Test:Film1
    Test2:Film2;
    Test3:Film3;
begin
with Test do begin
irgendwas:='';
irgendwas2:=4;
irgendwas3:=True;
end;
with Test2 do begin
.
.
.
end;

Und so weiter. Meinste das?