|
Adam Plucinski wrote:
You're right but if you are not author of this Delphi DLL you can't do this.
Use an intermediate DLL.
VS.NET String -> marshalled as char * -> DLL -> DLL function exposes a char * as input parameter -> the implementation creates a shortstring thanks to the constructor (delphi dependency here) -> this DLL calls the initial DLL, passing a shortstring as input parameter -> you're done.
sometimes it helps to look at the IL generated code
a MS guy on develop.com "answering" .NET issues
|
|
|
|
|
Yes - with one dll it is no problem to do this.
..but academic problem still exists 
when you have 10 dll's making 10 wrapper dll's is kinda boring
|
|
|
|
|
No, you need only one.
I am surprised that there is no article or existing workaround, if that's a real issue a lot of Delphi.NET developers have.
If that's a real issue, then don't miss the opportunity of writing a CP article. And get known!
It usually takes more than three weeks to prepare a good impromptu speech. Mark Twain
|
|
|
|
|
Does something look wrong with this?
ArrayList al = new ArrayList();
al.Add("Nick");
al.Add("Megan");
for(int i = 0; i < al.Count; i++)
Response.Write(al.Item[i].ToString());
I get this error, and I am looking at MSDN right now and there is an Item property. 
<br />
forum.aspx.cs(54,20): error CS0117: 'System.Collections.ArrayList' does not<br />
contain a definition for 'Item'<br />
Nick Parker
The goal of Computer Science is to build something that will last at least until we've finished building it. - Unknown
|
|
|
|
|
Item[] is a special property, only [] is public in the end. So it is : al[i].ToString().
sometimes it helps to look at the IL generated code
a MS guy on develop.com "answering" .NET issues
|
|
|
|
|
Actually, Item() is a VB.NET thing only. The equivalent in C# is the indexer which is what the [] operator means. 
Norm Almond: I seen some GUI's in my life but WTF is this mess
Leppie: I made an app for my sister and she wouldnt use it till it was colorful enough
Norm:good point leppie, from that statement I can only deduce that this GUI must be aimed at children
Leppie:My sister is 25
-Norm on the MailMagic GUI
|
|
|
|
|
StephaneRodriguez wrote:
Item[] is a special property, only [] is public in the end.
First off thanks Stephane, however would you not agree with me that is misleading on MS's part?
Nick Parker
The goal of Computer Science is to build something that will last at least until we've finished building it. - Unknown
|
|
|
|
|
Nick Parker wrote:
First off thanks Stephane, however would you not agree with me that is misleading on MS's part?
It would be if Stephane were telling the truth 
.Item() is the VB.NET implementation of a Collection indexer; [] is the C# implementation. If you consider how things were done in VB and C++ then it sort of makes a lot of sense.
It does become more confusing because a lot of collections in the .NET Framework are called "Items" AND Item is often the default property (another VB.NET concept), so you get used to seeing Items[], Items() and Item() but there's not much need for Item[].
... Or something like that 
Paul
|
|
|
|
|
Okay, I think I've almost cracked this one. I got some more help by looking at Carlos Perez's explorer tree control which also uses some interfaces from Shell32. This is what I now have:
using System;
using Microsoft;
using Microsoft.Win32;
using System.Runtime.InteropServices;
namespace ShellTypeLib
{
// Component structure for IActiveDeskTop
[StructLayout(LayoutKind.Sequential)]
struct COMPONENT
{
uint dwSize;
uint dwID;
int iComponentType;
bool fChecked;
bool fDirty;
bool fNoScroll;
COMPPOS cpPos;
char[] wszFriendlyName;
char[] wszSource;
}
[StructLayout(LayoutKind.Sequential)]
struct COMPPOS
{
uint dwSize;
int iLeft;
int iTop;
uint dwWidth;
uint dwHeight;
int izIndex;
bool fCanResize;
bool fCanResizeX;
bool fCanResizeY;
int iPreferredLeftPercent;
int iPreferredTopPercent;
}
[StructLayout(LayoutKind.Sequential)]
struct COMPONENTSOPT
{
uint dwSize;
bool fEnableComponents;
bool fActiveDesktop;
}
[StructLayout(LayoutKind.Sequential)]
struct WALLPAPEROPT
{
uint dwSize;
uint dwStyle;
}
// Declare IActiveDesktop interface
[Guid("F490EB00-1240-11D1-9888-006097DEACF9")]
[InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IActiveDesktop
{
[PreserveSig]
uint ApplyChanges(uint dwFlags);
[PreserveSig]
uint GetWallpaper([MarshalAs(UnmanagedType.LPWStr)]out string pwszWallpaper, uint cchWallpaper, uint dwReserved);
[PreserveSig]
uint SetWallpaper([MarshalAs(UnmanagedType.LPWStr)] string pwszWallpaper, uint dwReserved);
[PreserveSig]
uint GetWallpaperOptions(ref WALLPAPEROPT pwpo,uint dwReserved);
[PreserveSig]
uint SetWallpaperOptions(ref WALLPAPEROPT pwpo, uint dwReserved);
[PreserveSig]
uint GetPattern([MarshalAs(UnmanagedType.LPWStr)] string pwszPattern, uint cchPattern, uint dwReserved);
[PreserveSig]
uint SetPattern([MarshalAs(UnmanagedType.LPWStr)] string pwszPattern, uint dwReserved);
[PreserveSig]
uint GetDesktopItemOptions(ref COMPONENTSOPT pco, uint dwReserved);
[PreserveSig]
uint SetDesktopItemOptions(ref COMPONENTSOPT pcomp, uint dwReserved);
[PreserveSig]
uint AddDesktopItem(ref COMPONENT pcomp, uint dwReserved);
[PreserveSig]
uint AddDesktopItemWithUI(IntPtr hwnd, ref COMPONENT pcomp, uint dwReserved);
[PreserveSig]
uint ModifyDesktopItem(ref COMPONENT pcomp, uint dwFlags);
[PreserveSig]
uint RemoveDesktopItem(ref COMPONENT pcomp, uint dwReserved);
[PreserveSig]
uint GetDesktopItemCount(out int lpiCount, [MarshalAs(UnmanagedType.U4)]uint dwReserved);
[PreserveSig]
uint GetDesktopItem(int nComponent, ref COMPONENT pcomp, uint dwReserved);
[PreserveSig]
uint GetDesktopItemByID(uint dwID, ref COMPONENT pcomp, uint dwReserved);
[PreserveSig]
uint GenerateDesktopItemHtml([MarshalAs(UnmanagedType.LPWStr)] string pwszFileName, ref COMPONENT pcomp, uint dwReserved);
[PreserveSig]
uint AddUrl(IntPtr hwnd, [MarshalAs(UnmanagedType.LPWStr)] string pszSource, ref COMPONENT pcomp, uint dwFlags);
[PreserveSig]
uint GetDesktopItemBySource([MarshalAs(UnmanagedType.LPWStr)] string pszSource, ref COMPONENT pcomp, uint dwReserved);
}
// Declare ActiveDesktop as a COM coclass
[ComImport, Guid("75048700-EF1F-11D0-9888-006097DEACF9")]
class ActiveDesktop
{
}
}
namespace Wallpaper_test
{
///
/// Summary description for Class1.
///
class Class1
{
///
/// The main entry point for the application.
///
[STAThread]
static void Main(string[] args)
{
System.Console.WriteLine("Windows Wallpaper Tester\n");
ShellTypeLib.ActiveDesktop MyDesktop = new ShellTypeLib.ActiveDesktop();
Type objType = typeof(ShellTypeLib.IActiveDesktop);
System.Console.WriteLine(objType.IsInstanceOfType(MyDesktop));
ShellTypeLib.IActiveDesktop IDesk = (ShellTypeLib.IActiveDesktop) MyDesktop;
uint hresult;
hresult = IDesk.SetWallpaper(@"C:\Documents and Settings\Wjousts\My Documents\My Pictures\Test.jpg",0);
Console.WriteLine("Result from SetWallpaper: " + hresult.ToString("X"));
uint flags = 4;
hresult = IDesk.ApplyChanges(flags);
Console.WriteLine("Result from ApplyChanges: " + hresult.ToString("X"));
int count = 10;
uint reserved = 0;
hresult = IDesk.GetDesktopItemCount(out count,reserved);
System.Console.WriteLine(count);
Console.WriteLine("Result from GetDesktopItemCount: " + hresult.ToString("X"));
}
}
}
So now all three of the IActiveDesktop methods that I call return 0, which is good. Also GetDesktopItemCount is now returning the correct value. SetWallpaper returns zero and if I look at my registry with regedit I can see it has changed the ConvertedWallpaper key, but, and this is a big but, the wallpaper hasn't actually changed! What's more I could have changed that key a lot easier with Registry class in .NET. So I still have the problem of how do I get windows to actually act on the updated registry and CHANGE THE FREAKING WALLPAPER!!!
|
|
|
|
|
I have never, in any language, using any method, been able to successfully change the wallpaper. I tried to change the RegKey, I tried to use the Active Desktop interface, I tried everything. I've also never found any examples of this...I think it's impossible.
Norm Almond: I seen some GUI's in my life but WTF is this mess
Leppie: I made an app for my sister and she wouldnt use it till it was colorful enough
Norm:good point leppie, from that statement I can only deduce that this GUI must be aimed at children
Leppie:My sister is 25
-Norm on the MailMagic GUI
|
|
|
|
|
Actually this works:
// Imported COM function
[DllImport("User32.dll")]
private static extern bool SystemParametersInfo(int uiAction,int uiParam, string pvParam,int fWinIni);
// Changes desktop wallpaper
// <param name="strFileName" />string containing filename and path
public static void ChangeWP(string strFileName)
{
SystemParametersInfo(20,0,strFileName,1);
}
The reason I wanted to get IActiveDesktop working (apart from personal satisfaction) is that it also has methods for changing the wallpaper options (stretch, tile, center, etc).
|
|
|
|
|
Ah. I see. I think I saw that someplace else. I was just trying to do it with ActiveDesktop too because I had ActiveDesktop on at the time. So it was a bit of an exaggeration for me to say that I had never been able to do it...
Norm Almond: I seen some GUI's in my life but WTF is this mess
Leppie: I made an app for my sister and she wouldnt use it till it was colorful enough
Norm:good point leppie, from that statement I can only deduce that this GUI must be aimed at children
Leppie:My sister is 25
-Norm on the MailMagic GUI
|
|
|
|
|
Simulate pressing F5 while you are on the desktop (WM_KEYDOWN, VK_F5). This should do the trick.
sometimes it helps to look at the IL generated code
a MS guy on develop.com "answering" .NET issues
|
|
|
|
|
Hi,
I'm tackling the same IActiveDesktop problem and was wondering if you managed to work it out. I hope this gets through to your email.
Nathan.
|
|
|
|
|
My service is running on a computer i want to getsome information that are
is the computer in logoff state or not ?
if computer is in a logoff state
i want to login,if i have username,password and domain how to login programatically?
how many software are installed in a computer ?
i also want to get installed software list names?
is there any api available for this purpose?
r00d0034@yahoo.com
|
|
|
|
|
I can't help you with logging on programtically, but this code @ PlanetSourceCode should help you with everthing else you need to know: Son of Snoop on Steroids[^]
|
|
|
|
|
I know there is a way using PHP to controll content to display on a specific day at a specific time. I dont need to access any kind of database. I just need a way to display hidden content on a page on a specific day and time. Please help me. I am not the best with C#, so I need the simplest code possible. Please help me. Thanks.
--Peace
YakFreek
|
|
|
|
|
To set a control to appear at midday on the 30th of October:
if (DateTime.Now < DateTime.Parse("30 Oct 2002 12:00:00"))
MyControl.Visible = false;Simple enough?
Paul
|
|
|
|
|
Here is what I have currently in PHP. I need to create the same function in C#. The code loops and displays specific content until it hits the specified date and the it will display that conent. Anyways you will see what I am talking about below. Thanks for all the help..--peace
Here is the code I have now in PHP:
<? if (time()<mktime(0,0,0,9,27,2002)){?>
<table>
All this week, Monday through Firday, your chance at $100 at the following times:
6:30am, 7:30am, 8:30am
</table>
<? } else {?>
<table>
All this week, Monday through Firday, your chance at $100 at the following times:
6:30am, 7:30am, 8:30am
</table>
<? }?>
|
|
|
|
|
There are ways to do it inline like this but I would advise forgetting the way you used to do things (scripting) and thinking in terms of .NET.
In short, you can have two <asp:label ...%gt; tags and write the code you want (your two tables) into the labels "Text" properties.
eg.
<asp:label id="lblBeforeTime" runat="server">
All this week, Monday through Firday, your chance at $100 at the following times:
6:30am, 7:30am, 8:30am
</asp:label> Then add code to your Page_Load saying
if (DateTime.Now < new DateTime(2002, 9, 27, 0, 0, 0, 0))
lblAfterTime.Visible = false;
else
lblBeforeTime.Visible = false; Does this make sense? Are you using VS.NET or hand-coding?
Paul
|
|
|
|
|
Hi,
we have a web app developer under c# that, sometimes, fails to create the screen the way it should.
After debuging the code, we could find it to be the DB_E_ABORTLIMITREACHED exception being thrown.
What I need to know is what can be the cause of this exception? How can i isolate it (find what is the problem)? We just found it to be happening on some clients on the Fill method of the DataAdapter (after turning TRACE on, we saw that the Fill method was taking up to 32 seconds to return, and then came the exception).
Thanks in advance for any help
Marcelo
|
|
|
|
|
Maybe a casting problem?
It sounds like a DB problem, so if you want help, give us some more details to work with...
Give them a chance! Do it for the kittens, dear God, the kittens!
As seen on MS File Transfer: Please enter an integer between 1 and 2.
|
|
|
|
|
Like his username and password?
Norm Almond: I seen some GUI's in my life but WTF is this mess
Leppie: I made an app for my sister and she wouldnt use it till it was colorful enough
Norm:good point leppie, from that statement I can only deduce that this GUI must be aimed at children
Leppie:My sister is 25
-Norm on the MailMagic GUI
|
|
|
|
|
the code that calls the procedure is:
<br />
DataSet DS = new DataSet();<br />
SqlDataAdapter DAP = new SqlDataAdapter();<br />
SqlCommand cmd = new SqlCommand("P_SPB_CONSULTA_ENTRADA",m_Conexao1.SqlConnection);<br />
<br />
cmd.CommandType = CommandType.StoredProcedure;<br />
<br />
SqlParameter paramCdPasta = new SqlParameter("@cdPasta", SqlDbType.Int, 4);<br />
paramCdPasta.Value = cdPasta;<br />
cmd.Parameters.Add(paramCdPasta);<br />
<br />
SqlParameter paramNrCgc = new SqlParameter("@nrCgc", SqlDbType.VarChar, 8);<br />
paramNrCgc.Value = nrCgc;<br />
cmd.Parameters.Add(paramNrCgc);<br />
<br />
SqlParameter paramCdStatus = new SqlParameter("@cdStatus", SqlDbType.Int) ;<br />
paramCdStatus.Value = cdStatus;<br />
cmd.Parameters.Add(paramCdStatus);<br />
<br />
SqlParameter paramFlPeriodo = new SqlParameter("@flPeriodo", SqlDbType.Bit);<br />
paramFlPeriodo.Value = flPeriodo;<br />
cmd.Parameters.Add(paramFlPeriodo);<br />
<br />
SqlParameter paramDtDe = new SqlParameter("@dtDe", SqlDbType.VarChar, 20);<br />
paramDtDe.Value = dtDe;<br />
cmd.Parameters.Add(paramDtDe);<br />
<br />
SqlParameter paramDtAte = new SqlParameter("@dtAte", SqlDbType.VarChar, 20);<br />
paramDtAte.Value = dtAte;<br />
cmd.Parameters.Add(paramDtAte);<br />
<br />
SqlParameter paramFlViu = new SqlParameter("@flVisao", SqlDbType.Bit);<br />
paramFlViu.Value = flViu;<br />
cmd.Parameters.Add(paramFlViu);<br />
<br />
SqlParameter paramCdBanco = new SqlParameter("@cdBanco", SqlDbType.Int, 4);<br />
paramCdBanco.Value = cdBanco;<br />
cmd.Parameters.Add(paramCdBanco);<br />
<br />
SqlParameter paramCdUsuario = new SqlParameter("@cdUsuario", SqlDbType.Int, 4);<br />
paramCdUsuario.Value = cdUsuario;<br />
cmd.Parameters.Add(paramCdUsuario);<br />
<br />
SqlParameter paramCdDominio = new SqlParameter("@cdDominio", SqlDbType.Int, 4);<br />
paramCdDominio.Value = cdDominio;<br />
cmd.Parameters.Add(paramCdDominio);<br />
<br />
SqlParameter paramCdAgencia = new SqlParameter("@cdAgencia", SqlDbType.Int, 4);<br />
paramCdAgencia.Value = cdAgencia;<br />
cmd.Parameters.Add(paramCdAgencia);<br />
<br />
SqlParameter paramCdAgenciaS = new SqlParameter("@agencias", SqlDbType.VarChar,3000);<br />
paramCdAgenciaS.Value = Session["spb.strAgencias"];<br />
cmd.Parameters.Add(paramCdAgenciaS);<br />
<br />
SqlParameter paramDominios = new SqlParameter("@dominios", SqlDbType.VarChar,3000);<br />
paramDominios.Value = Session["spb.strDominios"];<br />
cmd.Parameters.Add(paramDominios);<br />
<br />
SqlParameter paramValor = new SqlParameter("@valor_de", SqlDbType.Money, 30);<br />
paramValor.Value = valor;<br />
cmd.Parameters.Add(paramValor);<br />
<br />
SqlParameter paramValor2 = new SqlParameter("@valor_ate", SqlDbType.Money, 30);<br />
paramValor2.Value = valor;<br />
cmd.Parameters.Add(paramValor2);<br />
<br />
SqlParameter paramPagatu = new SqlParameter("@pagina", SqlDbType.Int);<br />
paramPagatu.Value = (pagina == 0) ? pagina + 1 : pagina;
cmd.Parameters.Add(paramPagatu);<br />
<br />
SqlParameter paramQuant = new SqlParameter("@quant", SqlDbType.Int);<br />
paramQuant.Value = DataGrid1.PageSize;<br />
cmd.Parameters.Add(paramQuant);<br />
<br />
SqlParameter paramFiltro = new SqlParameter("@filtro", SqlDbType.VarChar);<br />
if (Session["Sort"] == null || Session["Sort"].ToString() == "" || Session["Sort"].ToString().ToLower() == "null")<br />
Session["Sort"] = "HORA";<br />
if (Session["SortType"] == null || Session["SortType"].ToString() == "" || Session["SortType"].ToString().ToLower() == "null")<br />
Session["SortType"] = "DESC";<br />
paramFiltro.Value = Session["Sort"].ToString() + " " + Session["SortType"].ToString();<br />
cmd.Parameters.Add(paramFiltro);<br />
<br />
m_Conexao1.SqlAbre(Session["spb.OleDbConString"].ToString());<br />
DAP.SelectCommand = cmd;<br />
DAP.SelectCommand.Connection = m_Conexao1.SqlConnection;<br />
DAP.TableMappings.Add("Table","entradas");<br />
DAP.Fill(DS,"entradas");<br />
m_Conexao1.SqlFecha();<br />
<br />
return DS;
We noticed that sometimes the code works fine, sometimes it return a Timeout expired message.
thanks for any help.
marcelo
|
|
|
|
|
WOW! What does this exactly do?
I still have a hunch about a casting problem somewhere, or perhaps increase your SQL timeout in the connection string, sorry my SQL knowledge is a bit scary
Give them a chance! Do it for the kittens, dear God, the kittens!
As seen on MS File Transfer: Please enter an integer between 1 and 2.
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
