घर
Top.Mail.Ru Yandeks.Metrika
मंच: "शुरुआती";
वर्तमान संग्रह: 2018.07.22;
डाउनलोड करें: [xml.tar.bz2];

नीचे

छवि पर एक तस्वीर कैसे प्रदर्शित करें? (डेल्फी एक्सई, एंड्रॉइड) इसी तरह की शाखाएँ खोजें


Антонов Саша   (2016-07-14 09:47) [0]

Здравствуйте! Хочу научиться вывести фото на компонент Image. Нашел пример на сайте Эмбаркадеро http://docwiki.embarcadero.com/CodeExamples/Berlin/en/FMXTCanvasDrawFunctions_(Delphi), немножко переделал для себя:
था
 MyBitmap: TBitmap;
 MyRect: TRectF;
शुरू करना
 MyBitmap := TBitmap.CreateFromFile("c:\myphoto.jpg");
 MyRect := TRectF.Create(50, 30, 150, 200);
 Image1.Bitmap.Canvas.BeginScene;
 Image1.Bitmap.Canvas.DrawBitmap(MyBitmap, MyRect, MyRect, 20);
 Image1.Bitmap.Canvas.EndScene;
अंत;

Поставил на событие OnShow формы(чтобы загружалоcь cразу при запуске), но получаю в итоге лишь белый экран телефона. Что делаю не так?



Антонов Саша   (2016-07-14 09:53) [1]

еще добавил такие строки:

प्रक्रिया TForm1.FormCreate (प्रेषक: TObject);
शुरू करना
 Image1.Bitmap.SetSize(Round(Image1.Width), Round(Image1.Height));
 Image1.Bitmap.Clear(TAlphaColors.White);
अंत;
результат тот же.. (((



Игорь Шевченко ©   (2016-07-14 10:18) [2]


> но получаю в итоге лишь белый экран телефона


А в андроиде на телефоне точно есть


> "c:\myphoto.jpg"


?



yui   (2016-07-14 10:38) [3]

все давно знают, что в ведроиде нету диска "це"

есть только диск "ф" (флешка)
и иногда диск "ы" (ыкстернал флешка)



Антонов Саша   (2016-07-14 10:52) [4]

Переделал, теперь беру фото из потока, предварительно загрузив его в ресурсы, но результат тот же.. ((

था
ABitmap:TBitmap;
aWidth,aHeight:integer;
SrcRect, DstRect: TRectF;
rs_img: TResourceStream;
Image : TImage;
शुरू करना
with Form1.Image1.Bitmap.Canvas do
शुरू करना
if FindResource(0, "MyPhoto", PChar(RT_RCDATA)) <> 0 then rs_img:=TResourceStream.Create(0,"MyPhoto",PChar(RT_RCDATA));
Image := TImage.Create(nil);
Image.BitMap := TBitMap.Create(0, 0);
Image.BitMap.LoadFromStream(rs_img);
ABitmap:=Image.BitMap;
aWidth:=ABitmap.Width;
aHeight:=ABitmap.Height;
SrcRect:=RectF(0,0,aWidth,aHeight);
DstRect:=RectF(x,y,aWidth+x,aHeight+y);
if BeginScene then
शुरू करना
DrawBitmap(ABitmap,SrcRect,DstRect, 1, True);
EndScene;
Image.Free;
rs_img.Free;
end;    
अंत;
अंत;



yui   (2016-07-14 11:00) [5]

имадж битмап хочет битмап (бмп)
а ты ему суешь левый жпег

это не будет работать не только лишь в андроиде. мало где это будет работать



Антонов Саша   (2016-07-14 11:01) [6]

Вычитал в интернете что народ напрямую пишет в Image: Image1.Bitmap.LoadFromStream(risunok);
но этот вариант не подходит так-как нужно пару фоток прочитать из ресурсов
и разместить в разных местах одного Image, типа галерею фото сделать.. ))



yui   (2016-07-14 11:05) [7]

если народ пишет, то почему бы не попробовать имадж битмап загрузить из mp4  с финальным матчем евро-2016?

по идее имадж должен и видос показать.

лоад же фром стрим, все дела, народ пишет....



Антонов Саша   (2016-07-14 11:11) [8]

Заменил фото на bmp-формат, в результате приложение закрывается сразу
после запуска на телефоне. Попробовал рисовать на канве формы, при событии  OnPaint, все работает независимо от формата, даже png  фото читает. А вот с отрисовкой на канве Image непонятка... ((



Антонов Саша   (2016-07-14 11:19) [9]

लेकिन हर ओनपेंट में फॉर्म के साथ काम करना असुविधाजनक है और आपको हर चीज को फिर से तैयार करना होगा। हमें एक घटक की आवश्यकता है जिसमें मैंने पेंट किया और भूल गया, फिर मैंने आवश्यक होने पर इसे समाप्त कर दिया। संभवतः छवि इसके लिए या पेंटबॉक्स के लिए अधिक उपयुक्त है?



Kilkennycat ©   (2016-07-14 14:46) [10]


> पेंटबॉक्स



Антонов Саша   (2016-07-14 15:09) [11]

क्या एक उदाहरण पेंटबॉक्स और बिटमैप के साथ काम कर सकता है? विशेष रूप से रुचि है कि क्या घटनाओं में, क्या करना है (ड्राइंग, अपडेट करना)? मैं क्या प्रारूप बना सकता हूं? पारदर्शिता के साथ png-format कैसे प्रदर्शित करें? मैंने एंड्रॉइड के लिए प्रोग्रामिंग के बारे में ओसिपोव पुस्तक डाउनलोड की, लेकिन सब कुछ बहुत कम है और कुछ उदाहरण हैं .. (()



Kilkennycat ©   (2016-07-14 15:28) [12]


> Можно пример работы с PaintBox и битмап? Особо интересует
> при каких событиях, что нужно делать(отрисовка, обновление)?
>  Какие форматы можно отрисовывать?

то есть напечатать здесь справку из Делфи?



Антонов Саша   (2016-07-14 15:52) [13]

)) ясно, буду дальше гуглить... Может найду раб.пример...



Антонов Саша   (2016-07-14 16:40) [14]

विरोधाभास जैसा कि यह लग सकता है, मदद कभी-कभी एक बेकार चीज है। मैं उस तरह के एक कार्यकर्ता की तरह एक बिटमैप के साथ एक उदाहरण लिया है, लेकिन यह अभी भी हल नहीं करता है .. ()



sniknik ©   (2016-07-14 16:58) [15]

а в Delphi XE есть модуль Jpeg? как в D7:
uses
 Jpeg;

  Image1.Picture.LoadFromFile("c:\myphoto.jpg");

ну, или что там вместо "c:"
काम नहीं कर रहा है?



Антонов Саша   (2016-07-14 17:08) [16]

>sniknik Про модуль Jpeg незнаю, беру фото из ресурсов через поток.
На канве формы рисует, а на Image/Paintbox нивкакую... ((
(Но работать с формой неудобно, постоянно приходится перерисовывать)



Kilkennycat ©   (2016-07-14 17:15) [17]


> (Но работать с формой неудобно, постоянно приходится перерисовывать)

а что, у формы нет события onPaint?



Антонов Саша   (2016-07-14 17:26) [18]

на OnPaint формы и перерисовывал все, добавишь еще что-то, старое изображение исчезнет, чтобы этого не случилось рисовал повторно старое и рядом новое,оч.неудобно.. В Image/PaintBox вроде должно запоминать старое без повторной отрисовки, но пока не получается ничего в  них вывести... ((
Еще блин эти ограничения с форматами.. На канве формы из ресурсов(потока) рисует jpg,bmp,png без проблем...



Антонов Саша   (2016-07-14 17:26) [19]

на OnPaint формы и перерисовывал все, добавишь еще что-то, старое изображение исчезнет, чтобы этого не случилось рисовал повторно старое и рядом новое,оч.неудобно.. В Image/PaintBox вроде должно запоминать старое без повторной отрисовки, но пока не получается ничего в  них вывести... ((
Еще блин эти ограничения с форматами.. На канве формы из ресурсов(потока) рисует jpg,bmp,png без проблем...



Антонов Саша   (2016-07-14 22:32) [20]

Решил задачку по своему, рисую на Bitmap, потом присваиваю его Image.. ))
оч.быстро работает! если бы рисовал на Image, наверное было бы медленее...



पन्ने: 1 पूरी शाखा

मंच: "शुरुआती";
वर्तमान संग्रह: 2018.07.22;
डाउनलोड करें: [xml.tar.bz2];

ऊपर









मेमोरी: 0.63 एमबी
समय: 0.031 c
2-1468478872
एंटोनोव साशा
2016-07-14 09:47
2018.07.22
छवि पर एक तस्वीर कैसे प्रदर्शित करें? (डेल्फी एक्सई, एंड्रॉइड)


2-1468086435
TEdit
2016-07-09 20:47
2018.07.22
TEdit & amp; TMemo





अफ्रीकी अल्बानियन अरबी भाषा अर्मेनियाई आज़रबाइजानी बस्क बेलारूसी बल्गेरियाई कैटलन सरलीकृत चीनी) चीनी पारंपरिक) क्रोएशियाई चेक डेनिश डच अंग्रेज़ी एस्तोनियावासी फिलिपिनो फिनिश फ्रेंच
गैलिशियन् जॉर्जियाई जर्मन यूनानी हाईटियन यहूदी हिंदी हंगरी आइसलैंड का इन्डोनेशियाई आयरिश इतालवी जापानी कोरियाई लात्वीयावासी लिथुआनियाई मेसीडोनियन मलायी मोलतिज़ नार्वेजियन
फ़ारसी पोलिश पुर्तगाली रोमानियाई रूसी सर्बियाई स्लोवाक स्लोवेनियाई स्पेनिश स्वाहिली स्वीडिश थाई तुर्की यूक्रेनी उर्दू वियतनामी वेल्श यहूदी बंगाली बोस्नियाई
सिबुआनो एस्पेरांतो गुजराती हौसा हमोंग ईग्बो जावानीस कन्नड़ खमेर लाओ लैटिन माओरी मराठी मंगोलियन नेपाली पंजाबी सोमाली तामिल तेलुगु योरूबा
ज़ुलु
Английский Французский Немецкий Итальянский Португальский Русский Испанский