Cool, great work :)
Originally, I was just gonna add a line like:
Code:
strCmd = Replace$(Trim$(Command$), """", "")
|
to allow opening of files from explorer.
Great work though :P Good luck with the XML thingy that I never bothered with, hahaha.
Sorry but I am not better than you in the VB!
For the opening of the RCO in the windows explorateur I use a RegKey !
But I have a question for her function =)!
For obtain the values of the text (by language) the function is :
???
But this functions return many chars !
See this file : http://www.zshare.net/download/2231629f062924/
I don't know how delete this char too !
Thanks for her futur answer...
I'll have to check. (not at home now, so I can't)
From memory, yes, that's the function.
Note that it returns a Unicode string, not an ASCII one - the file you uploaded looks fine for me.
![[Image: untitledhs9.jpg]](http://img395.imageshack.us/img395/9667/untitledhs9.jpg)
What version of Windows are you using?
Your fonction return a 0x00 at the end of the string...
And the annoter error come from the use RCO for generate the XML (It's old :p)
So, I Resolve my problem by the simple function :
Code:
Left(GetTextData(intII, cboTextLang.ListIndex), Len(GetTextData(intII, cboTextLang.ListIndex)) - 1)
|
Thanks for your help ! ^^
Ac_K Wrote:Your fonction return a 0x00 at the end of the string...
Strings typically end with a null byte. Maybe my thing goes over one character... should just change the
GetTextData() function then.
Ac_K Wrote:So, I Resolve my problem by the simple function :
Code:
Left(GetTextData(intII, cboTextLang.ListIndex), Len(GetTextData(intII, cboTextLang.ListIndex)) - 1)
|
I don't recommend that, primarily because you're calling
GetTextData() twice. Something like this would work better:
Code:
Dim strTemp As String
strTemp = GetTextData(intII, cboTextLang.ListIndex)
Left$(strTemp, Len(strTemp) - 1)
|
Or, probably better:
Code:
Replace$(GetTextData(intII, cboTextLang.ListIndex), vbNullChar, vbNullString)
|
Good luck!
Yeah Thanks a lot !!
Code:
Replace$(GetTextData(intII, cboTextLang.ListIndex), vbNullChar, vbNullString)
|
This function work fine !
At this moment I have add the multilanguage... and the export XML works... I could do the end of the multilanguage, the import XML and add the vshcol program to RCO Editor... but after that... I have no idea ! :p
Hmm, actually, I had a look. No, the code won't generate extra nulls.
It's to do with Unicode strings. PSP stores the text as Unicode. If you "convert" to ASCII, you'll loose stuff from some languages. Just make sure you're outputting a Unicode XML, not an ASCII one.
nice job i can say... but still i don understand how to use those things... any easier way for understanding this???
Understand the sourcecode? It's a mess - the main reason why I don't really want to continue with it...
ZiNgA BuRgA Wrote:Understand the sourcecode? It's a mess - the main reason why I don't really want to continue with it...
im to confused to read my own writing...i know, ill et someone else do it :P