Ĺadny brzuch
Mam taki kod, może ktoś podsunąć pomysł jak go rozbudować, żeby dodatkowo pobierał wysokość i szerokość otwieranego obrazu i wstawiał te dane do label1(wysokość) i label2 (szerokość)?
procedure TForm1.Button2Click(Sender: TObject); begin if OpenPictureDialog1.Execute then plik.Text := (OpenPictureDialog1.FileName); image1.Picture.LoadFromFile(plik.text); end;
Prubowałem Image1.Picture.Width i Image1.Picture.Height, ale wywala mi błąd:
Incompatible types: 'String' and 'Integer' :unsure:
Nie chce gotowego kodu, raczej coś, nad czym musiałbym popracować B)
// używaj BBCode - Bełdzio
Użytkownik Bełdzio edytował ten post 09 lipiec 2005, 00:02
to zrób IntToStr(integer);
Możesz trochę to rozwinąć?
Jestem początkującym programistą Delphi :\
Nie podawaj gotowego kodu, tylko coś do przerobienia, jeśli możesz.
Wyskakuje Ci komunikat "Incompatible types: 'String' and 'Integer'" czyli, krótko mówiąc ciąg <> liczbie, tak więc musisz użyć funkcji IntToStr (Integer na String), które przekonwertuje liczbę na ciąg
// kodu nie dam, bo z tym już sobie musisz poradzić
OK, działa i znowu WIELKIE dzięki :]
Można zamknąć topic.
Pozdro dla moderatorów
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
procedure TForm1.Button2Click(Sender: TObject); begin if OpenPictureDialog1.Execute then plik.Text := (OpenPictureDialog1.FileName); image1.Picture.LoadFromFile(plik.text); end;
Prubowałem Image1.Picture.Width i Image1.Picture.Height, ale wywala mi błąd:
Incompatible types: 'String' and 'Integer' :unsure:
Nie chce gotowego kodu, raczej coś, nad czym musiałbym popracować B)
// używaj BBCode - Bełdzio
Użytkownik Bełdzio edytował ten post 09 lipiec 2005, 00:02
to zrób IntToStr(integer);
Możesz trochę to rozwinąć?
Jestem początkującym programistą Delphi :\
Nie podawaj gotowego kodu, tylko coś do przerobienia, jeśli możesz.
Wyskakuje Ci komunikat "Incompatible types: 'String' and 'Integer'" czyli, krótko mówiąc ciąg <> liczbie, tak więc musisz użyć funkcji IntToStr (Integer na String), które przekonwertuje liczbę na ciąg
// kodu nie dam, bo z tym już sobie musisz poradzić
OK, działa i znowu WIELKIE dzięki :]
Można zamknąć topic.
Pozdro dla moderatorów