![]() |
|
|
#1
|
|||
|
|||
|
Добрый день, либо у меня мозги не работают либо их вообще нет, ну не работает следующая часть программы:
Код:
procedure TForm1.N11Click(Sender: TObject);
var fname: string;
begin
if openpicturedialog1.Execute then
begin
fname:=openpicturedialog1.FileName;
img0.picture.LoadFromFile(fname);
end;
end;что не так? окно вставки картинки открывается - выбираю картинку, а она не встявляется в программу Последний раз редактировалось Admin, 03.07.2011 в 16:47. |