Как загрузить картинку

@Evsesha · Регистрация: 13.08.2011

Author24 — интернет-сервис помощи студентам

Подскажите как исправить код PascalABC на PascalABC.net?
Сам код:

Pascal

write ('Введите Ф.И.О.: ');
read (n);
clrscr;
y:=loadpicture(n);
drawpicture(y,0,0);

пишет что loadpicture и drawpicture неизвестные имена

@Puporev · 13.08.2011, 21:35

Можно так.

Pascal

uses graphabc;
var n:string;
    b:Picture;
begin
write ('Введите имя файла рисунка: ');
readln (n);
window.Clear;
b:=Picture.Create(n);
b.Load(n);
b.Draw(50,50);
end.

@Evsesha · 13.08.2011, 21:55 **[ТС]**

Puporev, спасибо. но мне надо не создавать, а вывести на экран уже имеющуюся картинку. Сначала ввести ее имя, а потом ее вывести. если убрать строчку b:=Picture.Create(n); пишет, что в экземпляре объекта не задана ссылка на объект

@Puporev · 13.08.2011, 21:58

Сообщение от Evsesha

но мне надо не создавать,

А мы ее и не создаем, мы создаем объект класса Picture, куда грузим нашу картинку.
Ты хоть программу-то запусти...

Добавлено через 40 секунд
Вернее не объект, а экземпляр.

@Evsesha · 13.08.2011, 22:01 **[ТС]**

запускала. не находит файл почему-то

@Puporev · 13.08.2011, 22:05

Вот программ в архиве и файл рисунка. В окне ввода программы введете ball.bmp

@Evsesha · 13.08.2011, 22:14 **[ТС]**

Огромное спасибо. Я пыталась .gif загрузить

@mrbadvovan · 08.03.2015, 17:10

Дружище, а если в условии требуется написать имя файла без расширения и чтобы вышла картинка на экран?.. Подскажи, пожалуйста, как это сделать. С уважением, Владимир.

@Puporev · 08.03.2015, 17:17

Pascal

1
2
3

write ('Введите имя файла рисунка: ');
readln (n);
n:=n+'.bmp';

@mrbadvovan · 08.03.2015, 17:22

Очень выручил, Друг! Спасибо огромное!

@Evsesha 0 / 0 / 0 Регистрация: 13.08.2011 Сообщений: 4
	13.08.2011, 21:55 [ТС]	3
	Puporev, спасибо. но мне надо не создавать, а вывести на экран уже имеющуюся картинку. Сначала ввести ее имя, а потом ее вывести. если убрать строчку b:=Picture.Create(n); пишет, что в экземпляре объекта не задана ссылка на объект 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	13.08.2011, 21:58	4
	Сообщение от Evsesha но мне надо не создавать, А мы ее и не создаем, мы создаем объект класса Picture, куда грузим нашу картинку. Ты хоть программу-то запусти... Добавлено через 40 секунд Вернее не объект, а экземпляр. 0

@Evsesha 0 / 0 / 0 Регистрация: 13.08.2011 Сообщений: 4
	13.08.2011, 22:01 [ТС]	5
	запускала. не находит файл почему-то 0

@Evsesha 0 / 0 / 0 Регистрация: 13.08.2011 Сообщений: 4
	13.08.2011, 22:14 [ТС]	7
	Огромное спасибо. Я пыталась .gif загрузить 0

@mrbadvovan 0 / 0 / 0 Регистрация: 08.03.2015 Сообщений: 2
	08.03.2015, 17:10	8
	Дружище, а если в условии требуется написать имя файла без расширения и чтобы вышла картинка на экран?.. Подскажи, пожалуйста, как это сделать. С уважением, Владимир. 0

@mrbadvovan 0 / 0 / 0 Регистрация: 08.03.2015 Сообщений: 2
	08.03.2015, 17:22	10
	Очень выручил, Друг! Спасибо огромное! 0

Опции темы

Как загрузить картинку

Решение