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

Глюки после вставки фото   Найти похожие ветки 

← →
Делфёст   (2006-03-05 15:47) [0]

Сохраняю фото как графический объект Ole,
одновременно вставляю фотку в Image1
TbPersonalPhoto.LoadFromFile(edit7.Text);
размер 15x15 24bit
после чего начинаются непонятные глюки и при выходе из программы пишет ошибку.
Application.Error

с таким текстом
Exception EAccessViolation in module Project1.exe at 00000000.
AccessViolation at address 00000000. Rwad of address 00000000

---

← →
АРІ   (2006-03-05 15:53) [1]

А что это такое: TbPersonalPhoto?

---

← →
Делфёст   (2006-03-05 22:57) [2]

Это таблица
TbPersonal["Photo"] можно записать и TbPersonalPhoto
только TbPersonal["Photo"].LoadFromFile(edit7.Text); так картинка не вставляется, я знаю только один способ
TbPersonalPhoto.LoadFromFile(edit7.Text);
где Edit7.text путь до вставляемой картинки
может из за него глюк... но если я не правильно вставляю картинку, подскажите как через компонент TADOTable вставлять ее... везде примеры TQuery!

---

← →
АРІ   (2006-03-06 04:47) [3]

TADOTable вставлять ее... везде примеры TQuery

А чем принципиально отличается ADOTable от Query?

var
 Stream1: TStream;
 Stream2: TStream;
begin
 Stream1 := TFileStream.Create(Edit7.Text, fmOpenRead );
 try
   TbPersonal.Edit;
   Stream2 := TbPersonal.CreateBlobStream(TbPersonal.FiledByName("Photo"), bmWrite);
   try
      Stream2.CopyFrom(Stream1, Stream1.Size);
      TbPersonal.Post;
   finally
     Stream2.Free;
   end;
 finally
   Stream1.Free;
 end;
end;

---

← →
Делфёст   (2006-03-06 08:34) [4]

Ругается на CreateBlobStream
неизвестный идентификатор

---

← →
API ©   (2006-03-06 08:49) [5]

Ругается на CreateBlobStream

Тогда еще раз возвращаемся к тому, что у Вас такое TbPersonal...

Возможно, ругается на "FiledByName" - там опечатка. Должно быть "FieldByName". А Вы что, просто скопировали текст в Delphi Editor, не разобравшись что к чему?

---

← →
Делфёст   (2006-03-06 09:04) [6]

Нет, я разобрался... заметил, все правильно записал!
TbPersonal это компонент TADOTable

---

← →
API ©   (2006-03-06 09:16) [7]

Как все запущенно...

Давайте сюда свой код: список подключенных модулей, объявление класса и реализацию метода, в котором компилятор сообщает "неизвестный идентификатор".

---

← →
API ©   (2006-03-06 09:23) [8]

Или давайте, сделайте проще.

Киньте на форму в подходящее место TDBImage, подключите его к DataSource, укажите поле (как там у Вас - "Photo"). Добавьте OpenPictureDialog, кнопку "Обзор...", и на нажатие кнопки:

if OpenPictureDialog.Execute then
 DBImage.Picture.LoadFromFile(OpenPictureDialog.FileName);

---

← →
Делфёст   (2006-03-06 10:21) [9]

Ну простите простите, зеленый еще и никогда не работал с потоками!:)
я просто не знал как вставлять фото! Хотя я мог бы и сам догаться! ольшое спасибо за помощь!:)

---

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

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



Память: 0.47 MB
Время: 0.024 c