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

Смена картинки на форме...   Найти похожие ветки 

← →
Луарвик ©   (2003-07-08 19:02) [0]

Как програмно сменить картинку на форме? Какой елемент использовать?
Еще вопрос: каким оператором вызывать случайные числа?

---

← →
s.ts   (2003-07-08 19:13) [1]

1. ExtCtrls.TImage
2. System.Random

---

← →
Луарвик ©   (2003-07-08 19:15) [2]

Не многословен ты как я погляжу. Но спасибо!

---

← →
Луарвик ©   (2003-07-08 19:19) [3]

Не, подожди! Все равно не понятно: че именно делать! Вот есть на форме image и при нажатии на кнопку картинка должна меняться. Как это замутить?

---

← →
Anatoly Podgoretsky ©   (2003-07-08 19:25) [4]

А ты хоть в этот раз взглянул в справку по этим темам или опять нет?

---

← →
s.ts   (2003-07-08 19:25) [5]


unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons, ExtCtrls;

type
TForm1 = class(TForm)
Image1: TImage;
BitBtn1: TBitBtn;
procedure BitBtn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Image1.Picture.LoadFromFile("image.bmp");
end;

end.



---

← →
Луарвик ©   (2003-07-08 19:29) [6]

2 s.ts: э-э, так то оно из файла грузит! А скомпелировать вместе с прогой рисунки нельзя? Чтоб не зависима прога была?

---

← →
Луарвик ©   (2003-07-08 19:30) [7]

2 s.ts: э-э, так то оно из файла грузит! А скомпелировать вместе с прогой рисунки нельзя? Чтоб не зависима прога была?
2 Anatoly Podgoretsky: А русского хелпа нигде нет?

---

← →
Vladymir   (2003-07-09 02:50) [8]

Луарвик © (08.07.03 19:29)
Можно, запихнув картинку в ресурс.

---

← →
PI{}Puk ©   (2003-07-09 06:56) [9]

> Луарвик ©

Можно и так сделать, загрузить в ImageList а потом менять

var aaa: TIcon;
begin
aaa := TIcon.Create;
ImageList1.GetIcon(1,aaa);
YouForm.Icon := aaa;
aaa.Free;

end;

---

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

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



Память: 0.46 MB
Время: 0.01 c