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

как бмп проявить   Найти похожие ветки 

 
Alik   (2004-01-05 19:58) [0]

создаю
var
imag: Tbitmap;
form1.create(...);
begin
imag:=Tbitmap.Create;
imag.picture.loadfromfile("c:\1.bmp"); и нету его, и чме это лучше чем просто кинуть на форму имаг1 и написать image1.picture.loadfromfile("c:\1.bmp");


 
Юрий Федоров ©   (2004-01-05 20:01) [1]

form1.create(...);
странный код. Сомневаюсь, что это и задумано

imag.picture.loadfromfile
Это не откомпилируется


 
YuRock ©   (2004-01-05 20:26) [2]

Ничем, просто так (не совсем так) иногда удобно писать. А иногда удобнее и imag.bitmap.loadfromfile


 
YuRock ©   (2004-01-05 20:28) [3]

В догонку - вернее, "image1.picture.loadfromfile("c:\1.bmp");"


 
Mihey ©   (2004-01-05 20:49) [4]

Надо:

...
var Bmp: Tbitmap; // переменная
...
Bmp := TBitmap.Create; // создаём объект
Bmp.LoadFromFile("c:\1.bmp"); // грузим файл
Form1.Canvas.Draw(0, 0, Bmp); // рисуем на канве форме
...
Bmp.Free; // освобождаем память
...


 
Alik   (2004-01-05 21:00) [5]

var
bit : Tbitmap;
procedure TForm1.FormCreate(Sender: TObject);
begin
bit:=tbitmap.create;
bit.loadfromfile("c:\bg.bmp");
form1.canvas.draw(0,0,bit);
bit.free;
end;
и нечего не показываеться


 
Mihey ©   (2004-01-05 21:12) [6]

Вот ты сам посуди, что наваял. Рисуешь на форме, когда она создаётся. Надо:

procedure TForm1.FormPaint(Sender: TObject);
var bit: Tbitmap;
begin
bit:=tbitmap.create;
bit.loadfromfile("c:\1.bmp");
form1.canvas.draw(0,0,bit);
bit.free;
end;



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

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



Память: 0.46 MB
Время: 0.025 c
14-49679
Nikolay M.
2003-12-26 19:56
2004.01.16
В.В. Путин учит принимать парика :?))))))))))


1-49633
Condor
2004-01-04 16:11
2004.01.16
Почему растет объем картинки?


3-49408
BlackCat
2003-12-16 18:27
2004.01.16
Как построить такой запрос...


1-49607
Альф
2004-01-04 16:01
2004.01.16
TFrame.OnShow ?


8-49652
Fatkulin
2003-09-15 07:49
2004.01.16
Звук




   Наверх