AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Geteilte Felder in RECORDs???

Ein Thema von dmw256 · begonnen am 27. Dez 2002 · letzter Beitrag vom 27. Dez 2002
Antwort Antwort
dmw256

Registriert seit: 26. Dez 2002
36 Beiträge
 
Delphi 5 Professional
 
#1

Geteilte Felder in RECORDs???

  Alt 27. Dez 2002, 03:39
Moin, moin!

Kann man in Records Felder so deklarieren, daß man auf verschiedere
Art und Weise auf gleichen Speicherbereich zugreift?

Soll heißen, wenn man z.B. ein Feld
a: integer (4 Bytes)
hat, kann man irgendwie eine Variable
b: word
so definieren, daß b z.B. genau auf das 2. und 3. Byte von a
liegt?
(nach a:=0;b:=1; sollte a dann 256 sein...)
Und das ganze in einem Record (in Assembler jeht dat!)
Woher soll ich wissen, was ich denkte,
bevor ich höre, was ich sage...
  Mit Zitat antworten Zitat
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.117 Beiträge
 
Delphi 11 Alexandria
 
#2
  Alt 27. Dez 2002, 03:51
Moin dmw,

dat jeht auch in Delphi

Delphi-Quellcode:
TMyVariableType =
packed record
  // hier der Feste Anteil (muss nicht sein):
  dwFeld : DWORD;
  sFeld : string;
  // und hier der variable:
  case byte of
  $01 : (
    dwFeld1 : DWORD;
    dwFeld2 : DWORD;
    );
  $02 : (
    abFeld : array [1..4] of Byte;
    );
  $03 : (
    wdFeld : WORD;
    wdDummy : WORD;
    );
end;
Beim case muss, wie auch beim case im Programm ein ordinaler Typ angegeben werden, der gross genug ist um alle Unterscheidungen zu ermöglichen (Boolean würde bei dem Beispiel nicht funktionieren, da es nur zwei verschiedene Werte kennt).
Die Nummerierung muss nicht lückenlos sein. Die Angaben müssen halt nur im Wertebereich des angegebenen Typs liegen.
Wenn die einzelnen Varianten unterschiedlich gross sein sollen, muss man mit dem kleinsten beginnen, und dann nach Grösse aufsteigend weiter deklarieren (ist zumindest sicherer)

[EDIT]
Was ich noch vergessen hatte:
Der Variante Teil muss am Ende der Deklaration stehen.
[/EDIT]
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat
dmw256

Registriert seit: 26. Dez 2002
36 Beiträge
 
Delphi 5 Professional
 
#3
  Alt 27. Dez 2002, 04:02
Vielen Dank!!!
Werde ich doch gleich mas ausprobieren!
Woher soll ich wissen, was ich denkte,
bevor ich höre, was ich sage...
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:57 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz