Problem bei Zuweisung

[niederrheiner]

Hallo an Alle,

warum tritt bei der folgenden Zuweisung zur Laufzeit der Fehler Access violation auf?

Code: Alles auswählen

...
type
   comborec = record
                combo : TComboBox;
                name1 : String;
                name2 : String
   end;         
 
...
 
cbRezQuelle: TComboBox;  
 
...
 
var
  rcbRezQuelle     : comborec;     
 
...
 
  // Initialisierung verschiedener Variablen
showmessage('vor initialisierung');
  rcbRezQuelle.combo.Name := 'cbRezQuelle';   <====== bei dieser Zuweisung tritt der Fehler auf
showmessage('nach combo');

Wo habe ich einen Fehler gemacht?

Bis dann ...
MfG
Günter

[noenglish]

Tippfehler? Sollte es nicht .name1 bzw. .name2 sein?
Grüße
noenglish

[m.fuchs]

*Glaskugel herauskram*

Wenn es eine Access Violation ist vermute ich mal ganz stark dass rcbRezQuelle.combo nirgends erzeugt wird. Dagegen hilft ein

Code: Alles auswählen

rcbRezQuelle.combo := TComboBox.Create(nil);

ABER: deine Zuweisung mit der Name-Property lässt meine Glaskugel vermuten, dass Du die cbRezQuelle an die rcbRezQuelle.combo zuweisen wolltest. Das ginge dann so:

Code: Alles auswählen

rcbRezQuelle.combo := cbRezQuelle;

Kleiner Tipp: schreib das nächste Mal noch dazu was dein Code eigentlich machen soll.


hth
Micha

[MAC]

rcbRezQuelle ist ein Record, dort kann kein Access Violation auftreten.
Aber

Code: Alles auswählen

rcbRezQuelle.combo

ist ein Objekt und muss vorher zugewiesen werden. (Denn standartmäßig zeigt es auf nil und du kannst nicht mal einfach so den Wert des Nichts verändern )
Das heißt du musst erst eine Combobox zu Laufzeit erstellen oder eine schon existierene Combobox zuweisen:

Code: Alles auswählen

rcbRezQuelle.combo := Combobox1; // wenn eine Combobox bereits existiert
rcbRezQuelle.combo.Name := 'cbRezQuelle';

Code: Alles auswählen

rcbRezQuelle.combo := TCombobox.Create(Form1); // dynamisch erzeugen
rcbRezQuelle.combo.parent := Form1;
rcbRezQuelle.combo.left := 23;
rcbRezQuelle.combo.Width := 200;
rcbRezQuelle.combo.height := 30;
rcbRezQuelle.combo.Name := 'cbRezQuelle';

[niederrheiner]

Hallo an Alle,

dank Eurer Hilfe ist das Problem vom Tisch und ich habe wieder etwas gelernt.

Nochmals Dank an Alle Poster.

Bis dann ...
MfG
Günter