![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() |
sheka |
![]()
Сообщение
#1
|
![]() Я. ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 809 Пол: Мужской Реальное имя: Саша Репутация: ![]() ![]() ![]() |
Мне нужно сделать тест. Базу вопросов хочу хранить как file of record. Проблема заключается в том, что в тесте должны быть картинки. Хотел сделать как поле записи. Но вот проблема: в файл не записывается ни поле :TImage ни :TPicture ни даже :TBitmap.
Как это можно осуществить? Сообщение отредактировано: sheka - 6.02.2010 20:06 |
![]() ![]() |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
Фильтруй, кто тебе запрещает?
procedure TForm1.Button3Click(Sender: TObject);
var s: string;
begin
s := 'Иванов';
ADOTable1.Filtered := False;
ADOTable1.Filter := '[fio] = ' + QuotedStr(s);
ADOTable1.Filtered := True;
end;
Оставит тебе только Ивановых. |
![]() ![]() |
![]() |
Текстовая версия | 28.07.2025 7:23 |