Replace full path by relative path before compiling

[Miguel]

Hello everybody,

After spending some hours searching the forum i gave up,

i´m using Koda to GUI design and i want to automaticly replace the icon full path by relative path before compiling

In this case, replacing "C:\Documents and Settings\Miguel\Os meus documentos\Meus Scripts\Google Maps\Icons\Ok_check.ico" by @WorkingDir&"\icons\Ok_chech.ico"

Is this possible? How could i do it ?

this is my GUI design code

#Region ### START Koda GUI section ### Form=c:\documents and settings\miguel\os meus documentos\dropbox\meus scripts\google maps\opt_zonas_gui.kxf
$Opt_zonas_gui = GUICreate("zonas", 105, 347, 0, 0, BitOR($WS_SIZEBOX,$WS_THICKFRAME,$WS_POPUP,$WS_CLIPSIBLINGS), 0, $Main_Gui)
$ListView_opt_zonas = GUICtrlCreateListView("", 8, 8, 73, 289, BitOR($LVS_REPORT,$LVS_SINGLESEL,$LVS_SHOWSELALWAYS,$WS_GROUP), BitOR($WS_EX_CLIENTEDGE,$LVS_EX_CHECKBOXES))
$Icon_Ok = GUICtrlCreateIcon("C:\Documents and Settings\Miguel\Os meus documentos\Meus Scripts\Google Maps\Icons\Ok_check.ico", -1, 36, 305, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

thanks in advance

[ChrisL]

Why do you need both? Why not just have them all as relative paths in the first place?

The only way I can think of doing it if you insist is

If @Compiled then
  $Icon_OK_Check = @WorkingDir & "iconsOk_check.ico"
  Else
   $Icon_OK_Check = "C:Documents and SettingsMiguelOs meus documentosMeus ScriptsGoogle MapsIconsOk_check.ico"
Endif

$Icon_Ok = GUICtrlCreateIcon($Icon_OK_Check, -1, 36, 305, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))

Edited January 21, 2012 by ChrisL

[JohnOne]

I you are talking about a function to parse your code to do something like that, I don't think it is trivial.

First you would need a RegExp to locate all the paths, then a recursive search to find its relative position

etc...

But maybe I'm wrong about what you want to achieve. In any case you should not assume that the working directory

is on dir or another, and should set it with native function FileChangeDir().

[Miguel]

My problem is that Koda puts the full path in the icon and if i forgot to change the path to relative path before compiling, that image wont be shown.

thats why i am trying to find a way to change the path before compiling, maybe doing it using auto it wrapper. But my knowledges are not enough to achieve it.

[Miguel]

Maybe the only way to achieve it will be like this......

#cs ***********   DONT FORGET BEFORE COMPILING *************
Search -> Replace
"C:Documents and SettingsMiguelOs meus documentosDropboxMeus ScriptsGoogle MapsIcons"  -> @WorkingDir &"Icons"

#ce

Edited January 21, 2012 by Miguel

[guinness]

Why not use AutoItWrapper to embed the icon in the compiled script? Or am I missing something?

[Miguel]

Fixed !!!!

Created a script called _RunBeforeCompiling

This way all full paths placed by Koda wil be replaced by relative path

#include <File.au3>
$find = """C:Documents and SettingsMiguelOs meus documentosDropboxMeus ScriptsGoogle Maps"
$replace = "@WorkingDir&"""
$filename = @WorkingDir&"GmapsMarkers.au3"

$retval = _ReplaceStringInFile($filename,$find,$replace)
if $retval = -1 then
    msgbox(0, "ERROR", "The pattern could not be replaced in file: " & $filename & " Error: " & @error)
    exit
else
    msgbox(0, "INFO", "Found " & $retval & " occurances of the pattern: " & $find & " in the file: " & $filename)
endif

[Miguel]

@guiness

sorry my beginner question .... how do i use the embeded icon, i mean whats the path to a icon embeded in the EXE ?

[guinness]

Have a look here >> http://www.autoitscript.com/autoit3/scite/docs/AutoIt3Wrapper.htm and the section "Adding Extra Ico's to the program resources."

[martin]

In case it's ever any help, I have had the same problem many times with koda and this is how I deal with it.

In the Koda design I don't use the icon I really want to use, I do something like

$IconStEnd2Pt = GUICtrlCreateIcon("shell32.dll", -9, 970, 181, 34, 34, BitOR($GUI_SS_DEFAULT_ICON, $SS_SUNKEN))

Those kind of icon will be found on any PC I hope.

The after the Koda section of my script I have lines like this

GUICtrlSetImage($IconStEnd2Pt, @ScriptFullPath & 'imagespic5.ico')

or something like

GUICtrlSetImage($IconStEnd2Pt, @ScriptFullPath, -25) ; if I'm using AutoIt resources

[Miguel]

@ guiness

@ martin

Thank´s for your help.