Тема: Image адрес
Як дізнатися імя або адрес загруженой картінки в Image.
Ви не увійшли. Будь ласка, увійдіть або зареєструйтесь.
Ласкаво просимо вас на україномовний форум з програмування, веб-дизайну, SEO та всього пов'язаного з інтернетом та комп'ютерами.
Будемо вдячні, якщо ви поділитись посиланням на Replace.org.ua на інших ресурсах.
Для того щоб створювати теми та надсилати повідомлення вам потрібно Зареєструватись.
Український форум програмістів → Pascal/Delphi → Image адрес
Сторінки 1
Для відправлення відповіді ви повинні увійти або зареєструватися
Я загрузив катінку
img1.Picture.LoadFromFile('C:\1.png')
Потім мені треба дізнатися адрес або імя 'C:\1.png' картінки.
img1.Picture.????
Я би вам порадив завантажувати зображення через OpenPictureDialog
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
if(OpenPictureDialog1.Execute) then
begin
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;
end;
Тоді можна шлях до зображення отримати із власивості FileName
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
Edit1.Text:=OpenPictureDialog1.FileName;
end
Або так:
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
Edit1.Text:=ExtractFilePath(OpenPictureDialog1.FileName);
end
Назву зображення отримуємо так:
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
Edit1.Text:=ExtractFileName(OpenPictureDialog1.FileName);
end
Romanvolja
Навіщо кидати на форму цілий діалог, коли достатньо однієї змінної?
LastLoadedImage: string;
Romanvolja
Навіщо кидати на форму цілий діалог, коли достатньо однієї змінної?LastLoadedImage: string;
Мову Delphi вивчаю самостійно, без репетиторів тому багато чого ще не знаю, і роблю багато чого не правильно.
Тому перепрошую.
Нічого страшного, я тут не тільки для вас пишу. Багато хто вчитиметься по цьому форуму. Тому я намагаюся казати не лише як правильно, але і як краще.
Сторінки 1
Для відправлення відповіді ви повинні увійти або зареєструватися