Hallo alle...
wieder mal...
die verwendete
Unit ist eine Kopie einer ähnlichen und ist entsprechend angepaßt:
-
Unit Name
-Form Name
-Eingabefelder
Zugriffsverletzung bei folgender procedure:
Delphi-Quellcode:
procedure TFEinstellungen.LieferantEinlesen;
begin
BitBtn20.Enabled:= True;
ZQueryLieferant.SQL.Text:= 'select NAME from LIEFERANT order by NAME';
ZQueryLieferant.Open;
JvDBGrid7.Columns[0].Width:= 145;
JvDBGrid7.Columns[0].Title.Caption:= 'Name';
if not ZQueryLieferant.IsEmpty then
begin
BitBtn21.Enabled:= True;
FBefeuchtungBearbeiten.ComboBoxLieferant.Items.Clear;
FBSKBearbeiten.ComboBoxLieferant.Items.Clear; //<--- hier tritt die Zugriffsverletzung auf
repeat
FBefeuchtungBearbeiten.ComboBoxLieferant.Items.Add(ZQueryLieferant.FieldValues['NAME']);
FBSKBearbeiten.ComboBoxLieferant.Items.Add(ZQueryLieferant.FieldValues['NAME']);
until ZQueryLieferant.FindNext = False;
end
else BitBtn21.Enabled:= False;
end;
kommentiere ich die Zeilen mit 'FBSKBearbeiten.' heraus wird das Formular angezeigt und die ComboBox im Formular 'FBefeuchtungBearbeiten' gefüllt.
was ich schon gemacht habe:
-
Unit aus dem Projekt entfernt - neu eingebunden
- Uses Anweisungen entfernt --> im Prinzip werden sie beim compilieren neu angelegt
- Namensänderung ComboBoxen
... die Programmierhilfe in Verbindung mit 'FBSKBearbeiten' funktioniert
hat jemand eine spontane Idee ?
