Показать сообщение отдельно
  #6  
Старый 12.09.2023, 04:03
leon2009 leon2009 вне форума
Новичок
 
Регистрация: 18.03.2009
Сообщения: 71
Репутация: 10
Лампочка компоненты

Код:
  SQLQuery: TSQLQuery;
begin
  SQLQuery := TSQLQuery.Create(nil);
  try
    SQLQuery.SQLConnection := SqlConnection1; // указываем соединение с базой данных
    image1.Picture.LoadFromFile(SQLQuery.FieldByName('name').AsString);
    SQLQuery.ExecSQL(); // выполняем запрос
  finally
    SQLQuery.Free();
  end;
error4-min.jpg
не может найти имя файла
error5.jpg
Ответить с цитированием