Witam, wszystkich i proszę o pomoc.
Przeszukałem forum, jest kilka problemów z ntdll.dll, ale żaden nie przedstawia mojego problemu, nawet nie jest podobny.
Mam formularz, który w akcji FormShow ma taki kod:
procedure TForm6.FormShow(Sender: TObject);
begin
//Ustawianie wartości Sposób nadania/dostarczenia
sComboBox1.Items.Clear;
ZapytanieSelect('Select nazwa As N1 from dbo.tb_spos_nadania_dostarczenia;',ZQuery2);
while not ZQuery2.EOF do
begin
sComboBox1.Items.Add(ZQuery2.FieldByName('N1').AsString) ;
ZQuery2.Next;
end;
//Ustawianie wartości Odbiorca wm
sComboBox2.Items.Clear;
ZapytanieSelect('Select Nazwa As N2 from dbo.tb_odbiorcy order by Nazwa asc',ZQuery2);
ZQuery2.First;
while not ZQuery2.Eof do
begin
sComboBox2.Items.Add(ZQuery2.FieldByName('N2').AsString);
ZQuery2.Next;
end;
end;
Kiedy klikam w sComboBox2 wyświetla komunikat:
Access violation at adress 7C911F9E in module ntdll.dll. Write of address 40006D9D
Problem pojawia się na niektórych komputerach. Na moim laptopie działa bez problemu, na kompie w pracy nawet na koncie o prawach administratora nie.
Proszę o radę jak sobie z tym poradzić.