Вниз
Скачать: CL | DM;

Картинка   Найти похожие ветки 

← →
Linker ©   (2004-12-06 12:50) [0]

Как привязать к полю в Access картинку и заставить ее отображаться в Delphi?


← →
Submarine   (2004-12-06 14:27) [1]

Ну самый простой вариант, храни  в поле в БД путь к данной картинке (к примеру "c:\Image1.jpg"). А потом спокойно загружай
(что-то типа: Image1.LoadFromFile(query1Путь.value))...


← →
Sergilov ©   (2004-12-08 21:24) [2]

1.В поле базы ставишь тип поля Поле объекта OLE.
2.Добавляеш на форму Image.
Тут одно НО. Картинку в поле нужно добавлять средствами Delphi.
3.Добавление картинки в БД.

procedure TFormEditPerson.BitBtn3Click(Sender: TObject);
begin
If OpenPictureD.Execute() Then
Begin
TableMain.TPersonPhoto.LoadFromFile(OpenPictureD.FileName);
ImagePerson.Picture.LoadFromFile(OpenPictureD.FileName);
End;
end;

4. Открытие картинки

procedure TFormPerson.ActionEditExecute(Sender: TObject);
var
 JpegImage:TJpegImage;
begin
TableMain.TPerson.Edit;
JpegImage:=TJpegImage.Create;
If TableMain.TPersonPhoto.Value<>"" Then
Begin
JpegImage.Assign(TableMain.TPersonPhoto);
FormEditPerson.ImagePerson.Picture.Bitmap.Assign(JpegImage);
End;
JpegImage.Free;
FormEditPerson.ShowModal;
end;



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c
1-1103712262
FromKiev
2004-12-22 13:44
2005.01.09
Сообщения из трея


1-1103651670
Redlord
2004-12-21 20:54
2005.01.09
как перевести ( s:= 01FA0 ) в интегер


1-1103706374
V l a d i m i r
2004-12-22 12:06
2005.01.09
Компонент для ввода и отображения даты


1-1103711338
runa
2004-12-22 13:28
2005.01.09
Как используется TAction


3-1102496164
msguns
2004-12-08 11:56
2005.01.09
Извлечение метаданных. Документация




   Наверх