delphi - VCL.Bitmap To FMX.Bitmap -


i found code on web, fmx.bitmap not have scanline. possible copy or draw vcl.tbitmap fmx.bitmap somehow? 

{$ifdef mswindows} type   tbitmap = fmx.types.tbitmap;   tvclbitmap = vcl.graphics.tbitmap;  procedure takescreenshot(dest: fmx.types.tbitmap); var   dc: hdc;   size: tpointf;   vclbitmap: tvclbitmap;   y: integer; begin   vclbitmap := nil;   //size := fmx.platform.ifmxscreenservice.getscreensize;   dc := getdc(0);   try     vclbitmap := tvclbitmap.create;     vclbitmap.pixelformat := pf32bit;     vclbitmap.setsize(trunc(size.x), trunc(size.y));     bitblt(vclbitmap.canvas.handle, 0, 0, vclbitmap.width, vclbitmap.height,       dc, 0, 0, srccopy);     dest.setsize(vclbitmap.width, vclbitmap.height);     { format of fmx bitmap , 32 bit vcl bitmap same,       copy scanlines. - not true- fmx bitmap not have scanline? }     y := dest.height - 1 downto 0       move(vclbitmap.scanline[y]^, dest.scanline[y]^, dest.width * 4);     {dest.canvas.drawbitmap(); not possible assign or draw}       releasedc(0, dc);     vclbitmap.free;   end; end; {$endif}

you can use stream :

{$ifdef mswindows}  type    tvclbitmap = vcl.graphics.tbitmap;  procedure takescreenshot(dest: tbitmap); var   dc: hdc;   size: tpointf;   vclbitmap: tvclbitmap;   y: integer;   ms: tmemorystream; begin   ms := tmemorystream.create;   vclbitmap := nil;   // size := fmx.platform.ifmxscreenservice.getscreensize;   dc := getdc(0);   size.x := 500;   size.y := 500;   try     vclbitmap := tvclbitmap.create;     vclbitmap.pixelformat := pf32bit;     vclbitmap.setsize(trunc(size.x), trunc(size.y));     bitblt(vclbitmap.canvas.handle, 0, 0, vclbitmap.width, vclbitmap.height, dc,       0, 0, srccopy);     dest.setsize(vclbitmap.width, vclbitmap.height);     { format of fmx bitmap , 32 bit vcl bitmap same,       copy scanlines. - not true- fmx bitmap not have scanline? }     vclbitmap.savetostream(ms);     ms.position := 0;     dest.loadfromstream(ms);     ms.free;     { dest.canvas.drawbitmap(); not possible assign or draw }       releasedc(0, dc);     vclbitmap.free;   end; end; {$endif}

Comments

Post a Comment

Popular posts from this blog

java.util.scanner - How to read and add only numbers to array from a text file -

i'm learning java , have question regarding reading file want read numbers file contains strings well. here example of file: 66.56 "3 java 3-43 5-42 2.1 1 and here coding: public class test { public static void main (string [] args){ if (0 < args.length) { file x = new file(args[0]); try{ scanner in = new scanner( new fileinputstream(x)); arraylist<double> test = new arraylist<>(); while(in.hasnext()){ if(in.hasnextdouble()){ double f=in.nextdouble(); test.add(f);} else {in.next();} } catch(ioexception e) { system.err.println("exception during reading: " + e); } } my problem add 66.56,2.1 , 1 doesn't add 3 after "3 or ignores 3-43 , 5-42 can tell me how skip strings , add doubles here? thanks all said 3 ie; "3, 3-43 , 4-42 strings either u read string , split , check number @ " , - or put in space between characters , integers. jvm after compilation tre
Read more

html - Repeat image to extend header to fill screen -

i have header (2300x328px) , image (456x328px). want second image extend header left , right, header fills whole width availiable.it needs connect without overlapping, because there pattern. here image of mean: http://imgur.com/0ji3hae circles pattern (why should not overlap) , images extend header can repeated infinitely. for pattern align need align background pattern according header image (ex. center, left etc) , make sure pattern starts @ right place. i made fiddle explain mean - http://jsfiddle.net/taneleero/g99xa/ .header { background:url(http://i.imgur.com/bzvtzl4.jpg) repeat-x center; } .header img { display:block; margin:0px auto; }
Read more

javascript - Backbone.js getting target attribute -

i trying figure out why value of e.target.getattribute('data-text') becoming null when go html backbone js file. html: <script type="text/template" id="lesson-template"> <span id="lesson-title"><%= tracks[0].title %></span> <select class="sel"> <% _.each(tracks, function(track) { %> <option value = "<%= track.text %>" data-text="<%= track.title %>"><%= track.title %></option> <% }); %> </select> <p id="tracktext"><%= tracks[0].text %></p> </script> js: window.librarylessonview = lessonview.extend({ events: { "change .sel " : "changetext" }, changetext: function(e) { alert(e.target.getattribute('data-text')); //i getting null value here! document.getelementbyid("lesson-title").innerhtml= e.target.getattribute('data-text&
Read more