
12.09.2023, 04:03
|
Новичок
|
|
Регистрация: 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
|