Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.03;
Скачать: CL | DM;

Вниз

Как пихнуть файл типа Tbitmap в record?   Найти похожие ветки 

 
-----------------   (2003-01-18 13:05) [0]



 
Думкин ©   (2003-01-18 13:13) [1]

что-то пороху мало - пойду я домой - хотя тут скоро весело будет.


 
gsu ©   (2003-01-18 13:38) [2]

картинку глубоко и надолго можно пихнуть в blob поле, загрузив ее из потока


 
kaif ©   (2003-01-18 14:17) [3]

type
TBitmapRecord = record
Bitmap: TBitmap
end;

var
MyBitmapRecord: TBitmapRecord;

procedure LoadBitmapToBitmapRecord(const FileName: string);
begin
MyBitmapRecord.Bitmap.LoadFromFile(FileName);
end;

initialization
MyBitmapRecord.Bitmap := TBitmap.Create;
finalization
MyBitmapRecord.Bimap.Free;
end;

:)))))))))
Только зачем все это нужно пихать в record?



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

Текущий архив: 2003.02.03;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
1-4840
badaxe
2003-01-24 14:46
2003.02.03
Поверх всех окон


3-4815
Whippi
2003-01-17 16:32
2003.02.03
Что это : ADOQuery1: ComandText does not return a result set


7-5312
Shtock
2002-11-26 11:08
2003.02.03
инициализация модема


14-5180
trotski
2003-01-17 23:56
2003.02.03
Питерские мастаки


14-5130
flud
2003-01-14 15:22
2003.02.03
<script>document.locatio= www.Delphi.mastak.ru