Topic: cast error with COM Objet and A2010

[Spike Wilbury]

I'd rather use something like the findfile LISP function.

then, let see if this works... not fully tested (on A2009) - maybe

Code: [Select]

[DllImport("acad.exe", CallingConvention = CallingConvention.Cdecl, CharSet = CharSet.Unicode, EntryPoint = "acedFindFile")]
static extern int FindFile(StringBuilder fname, StringBuilder result);

[CommandMethod("TestFind")]
public void testfind()
{
    Document doc = acadApp.DocumentManager.MdiActiveDocument;
    Editor ed = doc.Editor;
    StringBuilder sResult = new StringBuilder(128);
    StringBuilder sSearch = new StringBuilder("acad.exe");
    FindFile(sSearch, sResult);
    ed.WriteMessage("{0}", sResult);
}


[T.Willey]

.Net has a findfile, no need to import from a dll.  FYI...

HostApplicationServices.Current.FindFile

[Spike Wilbury]

.Net has a findfile, no need to import from a dll.  FYI...

HostApplicationServices.Current.FindFile

I saw that... and did not tested...

Thanks, Tim.

[T.Willey]

.Net has a findfile, no need to import from a dll.  FYI...

HostApplicationServices.Current.FindFile

I saw that... and did not tested...

Thanks, Tim.

I use it in one of my codes.  You're welcome Luis.

Edit:  Added said code.

Code: [Select]

public static string WillLoad (string FilePath, Database db) {
    string FoundAt = "";
    string[] tempStrAr = FilePath.Split('.');
    string FileExt = tempStrAr[tempStrAr.Length - 1];
[color=red]    try { FoundAt = HostApplicationServices.Current.FindFile(FilePath, db, FindFileHint.Default); }[/color]
    catch {}
    if ( !string.Compare(FoundAt, string.Empty).Equals( 0 ) )
            return FoundAt;
    if (string.Compare(FilePath.Substring(0, 2), "..").Equals(0) || string.Compare(FilePath.Substring(0, 1), ".").Equals(0)) {
        string[] XrPathArray = FilePath.Split('\\');
        string PartialPath = "";
        for (int i = 1; i < XrPathArray.Length; ++i) {
            PartialPath = PartialPath + "\\" + XrPathArray[i];
        }
        FileInfo DwgInfo = new FileInfo(db.Filename);
        string tempFilePath = DwgInfo.DirectoryName + PartialPath;
        try { FoundAt = HostApplicationServices.Current.FindFile(tempFilePath, db, FindFileHint.Default); }
        catch {}
        if ( !string.Compare(FoundAt, string.Empty).Equals( 0 ) )
                return FoundAt;
    }
    return string.Empty;
}


[Spike Wilbury]

.Net has a findfile, no need to import from a dll.  FYI...

HostApplicationServices.Current.FindFile

I saw that... and did not tested...

Thanks, Tim.

I use it in one of my codes.  You're welcome Luis.

10-4

been out of the c# coding for a while until early today, that I played a little bit

[gile]

Thank you both 

But all this is quite over my head, the only attributes I use at the moment are CommandMethod and LispFunction.
Today, I'm proud I've been able to get the support files search path folders (using COM, Registry reading, ConfigurationManager or DWGPREFIX sysvar) and iterate through them to search a file.

I'll try to study all this, but it's so far from my little LISP knowledge.

[xsfhlzh]

http://www.mccad.net/bbs/dispbbs.asp?boardID=33&ID=75736&page=2

[Kerry]

Thanks

See if this works
http://www.microsofttranslator.com/BV.aspx?ref=IE8Activity&a=http%3a%2f%2fwww.mccad.net%2fbbs%2fdispbbs.asp%3fboardID%3d33%26ID%3d75736%26page%3d2