windows 7 - ShowMessage in Delphi XE3 DllMain -


dll below compiled xe3.

library mydll;  uses system.sysutils, system.classes, vcl.dialogs;  {$r *.res}  var   ii: integer;  function test: integer; begin   result := ii; end;  exports test;  begin   ii := 5;   showmessage('dll prolog'); end.

when call function test() delphi xe3 or delphi 2007 program correct result (5) in both cases. message "dll prolog" displayed delphi 2007 program, not delphi xe3 program. why?

edit

and when "run" dll xe3 ide delphi 2007 host showmessage() not work.

the key in function:

function messagedlgposhelp(const msg: string; dlgtype: tmsgdlgtype;   buttons: tmsgdlgbuttons; helpctx: longint; x, y: integer;   const helpfilename: string): integer; begin   if tosversion.check(6) , uselatestcommondialogs ,      styleservices.enabled , styleservices.issystemstyle     result := dotaskmessagedlgposhelp('', msg, dlgtype, buttons,       helpctx, x, y, helpfilename)   else     result := domessagedlgposhelp(createmessagedialog(msg, dlgtype, buttons),       helpctx, x, y, helpfilename); end;

in cases, depending on whether or not host application has comctl32 v6 manifest, different branches of if statement chosen.

if dotaskmessagedlgposhelp branch chosen, ensuing call taskdialogindirect fails hresult code $80070057. win32 error code, error_invalid_parameter.

if domessagedlgposhelp branch chosen, dialog shows.

i'm not sure why taskdialogindirect failing when called library initialization block, i'm not entirely surprised. severely restricted in can done dllmain , should not attempting show dialogs there.


Comments

Post a Comment

Popular posts from this blog

css - Text drops down with smaller window -

i've adapted css use in website , can't quite figure out why 1 aspect of page acting way acting. basically, when shrink window below size horizontally, of text "drops down". becomes issue if user viewing website through ipad vertical orientation. can view issue here . i'm hoping make if window gets smaller, placement of text remains intact. the problem area not have enough space put both side navigation , content on 1 line. make automatically adjust page's width when exceeds decrements of width. this code example, , highly unlikely work. if see css more clearly, provide exact code. @media , (max-width:960px) { /* assuming #wrapper 960px across */ #content {width:560px;} /* opposed 720px */ } edit the content drops down @ 980px, have shrink width after there. @media , (max-width:980px) { #container {width:520px;} }
Read more

php - Boolean search on database with 5 million rows, very slow -

i have script when user searches "apples", there coloumn related searches "shiny apples", , "rotten apples", etc. problem searches database has 5,600,000 rows , mysql lagging badly. here code: $get = mysql_query("select keyword searches match (keyword) against ('".mysql_real_escape_string(preg_replace('#([\s]+)#', '$1', $title))."' in boolean mode) limit 0,15"); this taking long time process , have active website searches getting performed every second, can recommend me tips? thanks! you need indexes. have had experiences in past creating indexes got significant performance gain.
Read more

c# - DetailsView in ASP.Net - How to add another column on the side/add a control in each row? -

i have detailsview control on page used edit various fields of record, works in respect. i looking way add 1 column (and if works, why not more) right, absolutely read-only, show same fields of record comparison purposes. i aware there no obvious way such thing out of box detailsview . have looked other controls (transposed gridview , recommended formview , listview ), nothing satisfies. have special data binding setup using detailsview , can't out of without losing features. anyone on how "hack in" additional columns (for display only) on detailsview ? the solution have now, use second detailsview , visible set false in aspx. in code, make sure databind hidden detailsview hosts data third column first, initial detailsview named itemdetails . and in item created event, pass third column html rendering of hidden controls (in last code block) : protected void itemdetails_itemcreated(object sender, eventargs e) { if (dataite...
Read more