Extensions :  K-Meleon Web Browser Forum
All about K-Meleon extensions. 
Go to Topic: Previous•Next
Go to: Forum List•Message List•New Topic•Search•Log In•Print View
autoit locale(translation-support) test
Posted by: disrupted
Date: October 04, 2009 10:28PM

this is an experiMENTAL release version on KEM using external ini locale files.

this is a test version, not a final release do not download this for regular use.

support for only: french, german and spanish

the locales are in
locale\es-ES
de-de fr-fr as kmextman.ini

the locales need to be translated for testing..for now they just have dummy text

autoit gets kmeleon locale language from prefs, in case others/else/english ..english locale is used embedded inside the autoit script (not externally... this is the only way to avoid problems with autoit..english must be embedded and not as an external file to avoid problems(over-zealous user deletes locale file etc)

plese download from this link (testers-only not a final release)
http://kmext.sf.net/tests/kmextman-inttest.zip


sources:
# K-Meleon Macros (http://kmeleon.sourceforge.net/wiki/index.php?id=MacroLanguage)

# --------extensions uninstaller-experimental-------------------------

$_keu_path=getfolder(RootFolder);
$_profile_path=getfolder(ProfileFolder);
$_keith_path=getfolder(RootFolder)."\\Tools\\keith";


keith{
menugrayed=(substr($LinkURL,0,14)!="http://kmext.s"winking smiley;
exec($_keith_path."\\keith.exe " . $LinkURL);
}

kmextman{
$getlocale=getpref(STRING,"general.useragent.contentlocale");
exec($_keu_path."\\kmextman-inttest.exe \"".$_profile_path."\" " . $getlocale);
}

kmextman_BuildMenu{
setmenu("&Tools",inline,keu_pag,6);
setmenu(keu_pag,macro,"Extensions Manager",kmextman,-1);
setmenu(LinkSave,inline,keith_pagina);
setmenu(keith_pagina,macro,"KM Extension",keith,1);
}

$OnInit=$OnInit."kmextman_BuildMenu;";
$macroModules=$macroModules."keu;";



; AutoIt Version: 3.3.0
; Language: mary poppins
; Platform: Win9x/NT
; Author: yannis

#Include <File.au3>
#Include <Array.au3>
#include <Misc.au3>
#include <extprop.au3>
#include <GUIConstants E x.au3>
#include <GUIComboBox.au3>
#notrayicon

if _Singleton("KME",0) = 0 Then
exit
endif

$locales=(@scriptdir & "\locales\")

if $cmdline[2]=("ES") then
$txt1=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "1", "kmextman")
$txt2=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "2", "kmextman")
$txt3=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "3", "kmextman")
$txt4=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "4", "kmextman")
$txt5=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "5", "kmextman")
$txt6=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "6", "kmextman")
$txt7=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "7", "kmextman")
$txt8=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "8", "kmextman")
$txt9=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "9", "kmextman")
$txt10=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "10", "kmextman")
$txt11=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "11", "kmextman")
$txt12=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "12", "kmextman")
$txt13=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "13", "kmextman")
$txt14=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "14", "kmextman")
$txt15=IniRead($locales & "es-ES\kmextman.ini", "kmextman", "15", "kmextman")
elseif $cmdline[2]=("DE") then
$txt1=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "1", "kmextman")
$txt2=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "2", "kmextman")
$txt3=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "3", "kmextman")
$txt4=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "4", "kmextman")
$txt5=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "5", "kmextman")
$txt6=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "6", "kmextman")
$txt7=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "7", "kmextman")
$txt8=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "8", "kmextman")
$txt9=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "9", "kmextman")
$txt10=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "10", "kmextman")
$txt11=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "11", "kmextman")
$txt12=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "12", "kmextman")
$txt13=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "13", "kmextman")
$txt14=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "14", "kmextman")
$txt15=IniRead($locales & "de-DE\kmextman.ini", "kmextman", "15", "kmextman")
else
if $cmdline[2]=("FR") then
$txt1=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "1", "kmextman")
$txt2=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "2", "kmextman")
$txt3=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "3", "kmextman")
$txt4=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "4", "kmextman")
$txt5=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "5", "kmextman")
$txt6=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "6", "kmextman")
$txt7=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "7", "kmextman")
$txt8=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "8", "kmextman")
$txt9=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "9", "kmextman")
$txt10=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "10", "kmextman")
$txt11=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "11", "kmextman")
$txt12=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "12", "kmextman")
$txt13=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "13", "kmextman")
$txt14=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "14", "kmextman")
$txt15=IniRead($locales & "fr-FR\kmextman.ini", "kmextman", "15", "kmextman")
else
$txt1=("K-Meleon Extensions Manager Error")
$txt2=("Only execute the manager from inside k-meleon. ")
$txt3=("K-meleon Extensions Manager")
$txt4=("uninstall")
$txt5=("edit macro")
$txt6=("run installer")
$txt7=("Note: K-meleon will be restarted on an uninstall/install")
$txt8=("can't uninstall: malformed ini, please reinstall this extension or contact the author")
$txt9=("The extension: ")
$txt10=(" has been uninstalled successfully. ")
$txt11=("macro editor mode: when done remember to save and restart k-meleon for changes to take effect")
$txt12=("this extension does not include a macro")
$txt13=("You don't have any installed extensions. Would you like to download extensions?")
$txt14=("installed extensions:")
$txt15=("install date:")
;$txt16=()
;$txt18=()
;$txt19=()
;$txt20=()
endif
endif

$KEITH=(@scriptDir & "\tools\keith\keith.exe")
$KMBIN=(@scriptDir & "\k-meleon.exe")
$DEL1=(@scriptDir & "\components\xpti.dat")
$DEL2=(@scriptDir & "\components\compreg.dat")
$kmexthome=("http://kmext.sourceforge.net"winking smiley
$openhome=($KMBIN & " " & $kmexthome)
$medit=(@scriptDir & "\tools\keith\notepad2.exe")

if $cmdline[0]=0 then
msgbox(48,$txt1, $txt2)
else
$inini=(@scriptDir & "\kmextensions")
$kmunext="*.ini"
$inipath=("pending")
$kmprefs=($CmdLine[1] & "\prefs.js")
$kmprof=($CmdLine[1] & "\")
;$testrun=("c:\windows\notepad.exe")



$FileList=_FileListToArray($inini,$kmunext)
If @Error=1 Then
openkmext()
Exit
EndIf
if $FileList= 0 Then
openkmext()
;MsgBox (64,"K-meleon Extensions Manager","You don't have any installed extensions. ")
Else
runman()
endif
endif


func runman()
$pentrim=_ArrayToString($FileList, "|", 1)
$remini=StringReplace($pentrim, ".ini", "")
$first=StringInStr($remini, "|" ,"",1)
$initial=StringMid($remini, 1, $first-1)
;msgbox(0, "test", $initial)
$hGUI = GUICreate($txt3,304,174)
$Label1 = GUICtrlCreateLabel($txt14 & $FileList[0], 10, 3, 140, 15)
$hCombo = GUICtrlCreateCombo("", 10, 20,178,100)
$update=GUICtrlSetData($hCombo,$remini, $initial)
$hButton = GUICtrlCreateButton($txt4,193,18,100)
$mButton = GUICtrlCreateButton($txt5,193,60,100)
$iButton = GUICtrlCreateButton($txt6,193,88,100)
$eButton = GUICtrlCreateButton("kmext.sf.net",193,116,100)
$Label2 = GUICtrlCreateLabel($txt7, 10, 157, 290, 20)
$inipath=($inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1])
$findinfo=IniRead($inipath, "info", "1", "N/A")
$date=_GetExtProperty($inipath,4)
$extinstdate= GUICtrlCreateLabel($txt15, 11, 44, 100, 20)
$setdata=GUICtrlCreateLabel($date, 71, 44, 120, 20)
$info= GUICtrlCreateLabel("info:", 11, 67, 40, 15)
$desc= GUICtrlCreateLabel($findinfo, 11, 83, 150, 67)
GUISetState()
WinSetOnTop($txt3, "", 1)


While 1

$msg = GUIGetMsg()
select
case $msg =$hCombo
$inipath=($inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1])
$findinfo=IniRead($inipath, "info", "1", "N/A")
$date=_GetExtProperty($inipath,4)
GUICtrlSetData($desc,$findinfo)
GUICtrlSetData($setdata,$date)
endselect
select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $hButton
;MsgBox (64,"K-meleon Extensions Manager",$testrun & " " & $inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1])
;$commandtest=($testrun & " " & $inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1])
$inipath=($inini & "\" & $FileList[_GUICtrlComboBox_GetCurSel($hCombo)+1])
if fileexists($inipath)then
;MsgBox (64,"K-meleon Extensions Manager",$inipath)
$findmacro=IniRead($inipath, "macros", "1", "supercalafragelisticexpialido.ciaus")
$findmacro2=IniRead($inipath, "macros", "2", "supercalafragelisticexpialido.ciaus")
$findmacro3=IniRead($inipath, "macros", "3", "supercalafragelisticexpialido.ciaus")
$findmacro4=IniRead($inipath, "macros", "4", "supercalafragelisticexpialido.ciaus")
$findmacro5=IniRead($inipath, "macros", "5", "supercalafragelisticexpialido.ciaus")
$findjar=IniRead($inipath, "chrome", "1", "supercalafragelisticexpialido.ciaus")
$findmani=IniRead($inipath, "chrome", "2", "supercalafragelisticexpialido.ciaus")
$findjar2=IniRead($inipath, "chrome", "3", "supercalafragelisticexpialido.ciaus")
$findmani2=IniRead($inipath, "chrome", "4", "supercalafragelisticexpialido.ciaus")
$findcomp1=IniRead($inipath, "components", "1", "supercalafragelisticexpialido.ciaus")
$findcomp2=IniRead($inipath, "components", "2", "supercalafragelisticexpialido.ciaus")
$findcomp3=IniRead($inipath, "components", "3", "supercalafragelisticexpialido.ciaus")
$findcomp4=IniRead($inipath, "components", "4", "supercalafragelisticexpialido.ciaus")
$findcomp5=IniRead($inipath, "components", "5", "supercalafragelisticexpialido.ciaus")
$findcomp6=IniRead($inipath, "components", "6", "supercalafragelisticexpialido.ciaus")
$findcomp7=IniRead($inipath, "components", "7", "supercalafragelisticexpialido.ciaus")
$findcomp8=IniRead($inipath, "components", "8", "supercalafragelisticexpialido.ciaus")
$findkplugs=IniRead($inipath, "kplugins", "1", "supercalafragelisticexpialido.ciaus")
$findplugs1=IniRead($inipath, "plugins", "1", "supercalafragelisticexpialido.ciaus")
$findplugs2=IniRead($inipath, "plugins", "2", "supercalafragelisticexpialido.ciaus")
$findplugs3=IniRead($inipath, "plugins", "3", "supercalafragelisticexpialido.ciaus")
$findplugs4=IniRead($inipath, "plugins", "4", "supercalafragelisticexpialido.ciaus")
$findpref=IniRead($inipath, "pref", "1", "supercalafragelisticexpialido.ciaus")
$findpref2=IniRead($inipath, "pref", "2", "supercalafragelisticexpialido.ciaus")
$findloc1=IniRead($inipath, "locales", "1", "supercalafragelisticexpialido.ciaus")
$findloc2=IniRead($inipath, "locales", "2", "supercalafragelisticexpialido.ciaus")
$findloc3=IniRead($inipath, "locales", "3", "supercalafragelisticexpialido.ciaus")
$findloc4=IniRead($inipath, "locales", "4", "supercalafragelisticexpialido.ciaus")
$findloc5=IniRead($inipath, "locales", "5", "supercalafragelisticexpialido.ciaus")
$findloc6=IniRead($inipath, "locales", "6", "supercalafragelisticexpialido.ciaus")
$findloc7=IniRead($inipath, "locales", "7", "supercalafragelisticexpialido.ciaus")
$findloc8=IniRead($inipath, "locales", "8", "supercalafragelisticexpialido.ciaus")
$findloc9=IniRead($inipath, "locales", "9", "supercalafragelisticexpialido.ciaus")
$findloc10=IniRead($inipath, "locales", "10", "supercalafragelisticexpialido.ciaus")
$findloc11=IniRead($inipath, "locales", "11", "supercalafragelisticexpialido.ciaus")
$findloc12=IniRead($inipath, "locales", "12", "supercalafragelisticexpialido.ciaus")
$findloc13=IniRead($inipath, "locales", "13", "supercalafragelisticexpialido.ciaus")
$findloc14=IniRead($inipath, "locales", "14", "supercalafragelisticexpialido.ciaus")
$findloc15=IniRead($inipath, "locales", "15", "supercalafragelisticexpialido.ciaus")
$findloc16=IniRead($inipath, "locales", "16", "supercalafragelisticexpialido.ciaus")
$findloc17=IniRead($inipath, "locales", "17", "supercalafragelisticexpialido.ciaus")
$findloc18=IniRead($inipath, "locales", "18", "supercalafragelisticexpialido.ciaus")
$findloc19=IniRead($inipath, "locales", "19", "supercalafragelisticexpialido.ciaus")
$findloc20=IniRead($inipath, "locales", "20", "supercalafragelisticexpialido.ciaus")
$findtools=IniRead($inipath, "tools", "1", "supercalafragelisticexpialido.ciaus")
$findtools2=IniRead($inipath, "tools", "2", "supercalafragelisticexpialido.ciaus")
$findtools3=IniRead($inipath, "tools", "3", "supercalafragelisticexpialido.ciaus")
$findtools4=IniRead($inipath, "tools", "4", "supercalafragelisticexpialido.ciaus")
$findtools5=IniRead($inipath, "tools", "5", "supercalafragelisticexpialido.ciaus")
$findtools6=IniRead($inipath, "tools", "6", "supercalafragelisticexpialido.ciaus")
$findtools7=IniRead($inipath, "tools", "7", "supercalafragelisticexpialido.ciaus")
$findtools8=IniRead($inipath, "tools", "8", "supercalafragelisticexpialido.ciaus")
$findscripts=IniRead($inipath, "scripts", "1", "supercalafragelisticexpialido.ciaus")
$findscripts2=IniRead($inipath, "scripts", "2", "supercalafragelisticexpialido.ciaus")
$findscripts3=IniRead($inipath, "scripts", "3", "supercalafragelisticexpialido.ciaus")
$findscripts4=IniRead($inipath, "scripts", "4", "supercalafragelisticexpialido.ciaus")
$findscripts5=IniRead($inipath, "scripts", "5", "supercalafragelisticexpialido.ciaus")
$findscripts6=IniRead($inipath, "scripts", "6", "supercalafragelisticexpialido.ciaus")
$findskins1=IniRead($inipath, "skins", "1", "supercalafragelisticexpialido.ciaus")
$findskins2=IniRead($inipath, "skins", "2", "supercalafragelisticexpialido.ciaus")
$findskins3=IniRead($inipath, "skins", "3", "supercalafragelisticexpialido.ciaus")
$findskins4=IniRead($inipath, "skins", "4", "supercalafragelisticexpialido.ciaus")
$findstyles=IniRead($inipath, "stylesheets", "1", "supercalafragelisticexpialido.ciaus")
$findstyles2=IniRead($inipath, "stylesheets", "2", "supercalafragelisticexpialido.ciaus")
$findstyles3=IniRead($inipath, "stylesheets", "3", "supercalafragelisticexpialido.ciaus")
$findstyles4=IniRead($inipath, "stylesheets", "4", "supercalafragelisticexpialido.ciaus")
$findstyles5=IniRead($inipath, "stylesheets", "5", "supercalafragelisticexpialido.ciaus")
$findpfiles=IniRead($inipath, "profile", "1", "supercalafragelisticexpialido.ciaus")
$findpfiles2=IniRead($inipath, "profile", "2", "supercalafragelisticexpialido.ciaus")
$findpfiles3=IniRead($inipath, "profile", "3", "supercalafragelisticexpialido.ciaus")
$findroot1=IniRead($inipath, "root", "1", "supercalafragelisticexpialido.ciaus")
$findroot2=IniRead($inipath, "root", "2", "supercalafragelisticexpialido.ciaus")
$findroot3=IniRead($inipath, "root", "3", "supercalafragelisticexpialido.ciaus")
;MsgBox(48, "test macro", $findmacro, 10)
;MsgBox(48, "test jar", $findjar, 10)
;MsgBox(48, "test mani", $findmani, 10)
;MsgBox(48, "test plug", $findplugs1, 10)
;MsgBox(48, "test loc1", $findloc1, 10)
;MsgBox(48, "test loc2", $findloc2, 10)
;MsgBox(48, "test loc3", $findloc3, 10)
;MsgBox(48, "test skins1", $findskins1, 10)
;MsgBox(48, "test skins2", $findskins2, 10)
;MsgBox(48, "test skins3", $findskins3, 10)
;MsgBox(48, "test skins4", $findskins4, 10)
$retpath=(@scriptdir)

if $findmacro=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findmacro=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findmacro2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findmacro2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findmacro3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findmacro3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findmacro4=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findmacro4=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findmacro5=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findmacro5=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findjar=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findjar=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findmani=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findmani=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findjar2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findjar2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findmani2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findmani2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findcomp1=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findcomp1=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findcomp2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findcomp2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findcomp3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findcomp3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findcomp4=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findcomp4=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findcomp5=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findcomp5=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findcomp6=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findcomp6=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findcomp7=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findcomp7=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findcomp8=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findcomp8=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findkplugs=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findkplugs=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findplugs1=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findplugs1=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

if $findplugs2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findplugs2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findplugs3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findplugs3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

;---------------------------------------------------

if $findplugs4=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findplugs4=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findpref=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findpref=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findpref2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findpref2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc1=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc1=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc4=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc4=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc5=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc5=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc6=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc6=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc7=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc7=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc8=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc8=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc9=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc9=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc10=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc10=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc11=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc11=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc12=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc12=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc13=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc13=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc14=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc14=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc15=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc15=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc16=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc16=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc17=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc17=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc18=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc18=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc19=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc19=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findloc20=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findloc20=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findtools=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findtools=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findtools2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findtools2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findtools3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findtools3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findtools4=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findtools4=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findtools5=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findtools5=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findtools6=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findtools6=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findtools7=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findtools7=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findtools8=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findtools8=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findscripts=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findscripts=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findscripts2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findscripts2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findscripts3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findscripts3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findscripts4=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findscripts4=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findscripts5=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findscripts5=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findscripts6=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findscripts6=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findskins1=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findskins1=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findskins2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findskins2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findskins3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findskins3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findskins4=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findskins4=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findstyles=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findstyles=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findstyles2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findstyles2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findstyles3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findstyles3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findstyles4=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findstyles4=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findstyles5=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findstyles5=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findpfiles=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findpfiles=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findpfiles2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findpfiles2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findpfiles3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findpfiles3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findroot1=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findroot1=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findroot2=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findroot2=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else


if $findroot3=("") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
elseif $findroot3=("\") then
GUICtrlSetData($desc,$txt8)
FileDelete($inipath)
else

$retpath=(@scriptdir)
guidelete()
$retmacro=($retpath &"\macros\" & $findmacro)
$retmacro2=($retpath &"\macros\" & $findmacro2)
$retmacro3=($retpath &"\macros\" & $findmacro3)
$retmacro4=($retpath &"\macros\" & $findmacro4)
$retmacro5=($retpath &"\macros\" & $findmacro5)
$retjar=($retpath &"\chrome\" & $findjar)
$retmani=($retpath &"\chrome\" & $findmani)
$retjar2=($retpath &"\chrome\" & $findjar2)
$retmani2=($retpath &"\chrome\" & $findmani2)
$retcomp1=($retpath &"\components\" & $findcomp1)
$retcomp2=($retpath &"\components\" & $findcomp2)
$retcomp3=($retpath &"\components\" & $findcomp3)
$retcomp4=($retpath &"\components\" & $findcomp4)
$retcomp5=($retpath &"\components\" & $findcomp5)
$retcomp6=($retpath &"\components\" & $findcomp6)
$retcomp7=($retpath &"\components\" & $findcomp7)
$retcomp8=($retpath &"\components\" & $findcomp8)
$retkplugs=($retpath &"\kplugins\" & $findkplugs)
$retplugs1=($retpath &"\plugins\" & $findplugs1)
$retplugs2=($retpath &"\plugins\" & $findplugs2)
$retplugs3=($retpath &"\plugins\" & $findplugs3)
$retplugs4=($retpath &"\plugins\" & $findplugs4)
$retpref=($retpath &"\defaults\pref\" & $findpref)
$retpref2=($retpath &"\defaults\pref\" & $findpref2)
$retloc1=($retpath &"\locales\" & $findloc1)
$retloc2=($retpath &"\locales\" & $findloc2)
$retloc3=($retpath &"\locales\" & $findloc3)
$retloc4=($retpath &"\locales\" & $findloc4)
$retloc5=($retpath &"\locales\" & $findloc5)
$retloc6=($retpath &"\locales\" & $findloc6)
$retloc7=($retpath &"\locales\" & $findloc7)
$retloc8=($retpath &"\locales\" & $findloc8)
$retloc9=($retpath &"\locales\" & $findloc9)
$retloc10=($retpath &"\locales\" & $findloc10)
$retloc11=($retpath &"\locales\" & $findloc11)
$retloc12=($retpath &"\locales\" & $findloc12)
$retloc13=($retpath &"\locales\" & $findloc13)
$retloc14=($retpath &"\locales\" & $findloc14)
$retloc15=($retpath &"\locales\" & $findloc15)
$retloc16=($retpath &"\locales\" & $findloc16)
$retloc17=($retpath &"\locales\" & $findloc17)
$retloc18=($retpath &"\locales\" & $findloc18)
$retloc19=($retpath &"\locales\" & $findloc19)
$retloc20=($retpath &"\locales\" & $findloc20)
$rettools=($retpath &"\tools\" & $findtools)
$rettools2=($retpath &"\tools\" & $findtools2)
$rettools3=($retpath &"\tools\" & $findtools3)
$rettools4=($retpath &"\tools\" & $findtools4)
$rettools5=($retpath &"\tools\" & $findtools5)
$rettools6=($retpath &"\tools\" & $findtools6)
$rettools7=($retpath &"\tools\" & $findtools7)
$rettools8=($retpath &"\tools\" & $findtools8)
$retscripts=($retpath &"\scripts\" & $findscripts)
$retscripts2=($retpath &"\scripts\" & $findscripts2)
$retscripts3=($retpath &"\scripts\" & $findscripts3)
$retscripts4=($retpath &"\scripts\" & $findscripts4)
$retscripts5=($retpath &"\scripts\" & $findscripts5)
$retscripts6=($retpath &"\scripts\" & $findscripts6)
$retskins1=($retpath &"\skins\default\" & $findskins1)
$retskins2=($retpath &"\skins\default\" & $findskins2)
$retskins3=($retpath &"\skins\default\" & $findskins3)
$retskins4=($retpath &"\skins\default\" & $findskins4)
$retstyles=($retpath &"\styles\" & $findstyles)
$retstyles2=($retpath &"\styles\" & $findstyles2)
$retstyles3=($retpath &"\styles\" & $findstyles3)
$retstyles4=($retpath &"\styles\" & $findstyles4)
$retstyles5=($retpath &"\styles\" & $findstyles5)
$retpfiles=($CmdLine[1] & "\" & $findpfiles)
$retpfiles2=($CmdLine[1] & "\" & $findpfiles2)
$retpfiles3=($CmdLine[1] & "\" & $findpfiles3)
$retroot1=($retpath & "\" & $findroot1)
$retroot2=($retpath & "\" & $findroot2)
$retroot3=($retpath & "\" & $findroot3)
;MsgBox(48, "test loc3", $retmacro, 10)
;MsgBox(48, "test comp3", $retcomp3, 10)
;MsgBox(48, "test locale1", $retloc1, 10)
;MsgBox(48, "test locale3", $retloc3, 10)
;MsgBox(48, "test tools", $rettools, 10)
;MsgBox(48, "test sk1", $retskins1, 10)
;MsgBox(48, "test sk2", $retskins2, 10)
;MsgBox(48, "test sk3", $retskins3, 10)
;MsgBox(48, "test sk4", $retskins4, 10)
ProcessClose("loader.exe")
ProcessClose("k-meleon.exe")
sleep(400)
FileDelete($retmacro)
FileDelete($retmacro2)
FileDelete($retmacro3)
FileDelete($retmacro4)
FileDelete($retmacro5)
DirRemove($retmacro, 1)
DirRemove($retmacro2, 1)
DirRemove($retmacro3, 1)
DirRemove($retmacro4, 1)
DirRemove($retmacro5, 1)
FileDelete($retjar)
FileDelete($retmani)
FileDelete($retjar2)
FileDelete($retmani2)
FileDelete($retcomp1)
FileDelete($retcomp2)
FileDelete($retcomp3)
FileDelete($retcomp4)
FileDelete($retcomp5)
FileDelete($retcomp6)
FileDelete($retcomp7)
FileDelete($retcomp8)
FileDelete($retkplugs)
FileDelete($retplugs1)
FileDelete($retplugs2)
FileDelete($retplugs3)
FileDelete($retplugs4)
FileDelete($retpref)
FileDelete($retpref2)
FileDelete($retloc1)
FileDelete($retloc2)
FileDelete($retloc3)
FileDelete($retloc4)
FileDelete($retloc5)
FileDelete($retloc6)
FileDelete($retloc7)
FileDelete($retloc8)
FileDelete($retloc9)
FileDelete($retloc10)
FileDelete($retloc11)
FileDelete($retloc12)
FileDelete($retloc13)
FileDelete($retloc14)
FileDelete($retloc15)
FileDelete($retloc16)
FileDelete($retloc17)
FileDelete($retloc18)
FileDelete($retloc19)
FileDelete($retloc20)
FileDelete($rettools)
FileDelete($rettools2)
FileDelete($rettools3)
FileDelete($rettools4)
FileDelete($rettools5)
FileDelete($rettools6)
FileDelete($rettools7)
FileDelete($rettools8)
DirRemove($rettools, 1)
DirRemove($rettools2, 1)
DirRemove($rettools3, 1)
DirRemove($rettools4, 1)
DirRemove($rettools5, 1)
DirRemove($rettools6, 1)
DirRemove($rettools7, 1)
DirRemove($rettools8, 1)
FileDelete($retscripts)
FileDelete($retscripts2)
FileDelete($retscripts3)
FileDelete($retscripts4)
FileDelete($retscripts5)
FileDelete($retscripts6)
DirRemove($retscripts)
DirRemove($retscripts2)
DirRemove($retscripts3)
DirRemove($retscripts4)
DirRemove($retscripts5)
DirRemove($retscripts6)
FileDelete($retskins1)
FileDelete($retskins2)
FileDelete($retskins3)
FileDelete($retskins4)
DirRemove($retskins1)
DirRemove($retskins2)
DirRemove($retskins3)
DirRemove($retskins4)
FileDelete($retstyles)
FileDelete($retstyles2)
FileDelete($retstyles3)
FileDelete($retstyles4)
FileDelete($retstyles5)
FileDelete($retroot1)
FileDelete($retroot2)
FileDelete($retroot3)
DirRemove($retroot1)
DirRemove($retroot2)
DirRemove($retroot3)
FileDelete($retpfiles)
FileDelete($retpfiles2)
FileDelete($retpfiles3)
DirRemove($retpfiles, 1)
DirRemove($retpfiles2, 1)
DirRemove($retpfiles3, 1)
sleep(100)
FileDelete($inipath)
FileDelete($DEL1)
FileDelete($DEL2)

$cleanclose=("user_pref" & "(" &"""" & "kmeleon.plugins.sessions.cleanShutdown" & """" & "," & " true" & ");")
FileWriteLine($kmprefs, $cleanclose)
sleep(48)

run($KMBIN)
Winwaitactive("[CLASS:KMeleon Browser Window]", "", 5)
sleep(888)

$findextname=StringTriMRight($findmacro, 4)
$message=($txt9 & $findextname & $txt10)
MsgBox(64, "KEU: uninstall complete", $message, 8)
exit



EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
else
GUICtrlSetData($desc,"invalid uninstall ini")
endif

Case $msg = $mButton
$findmacro=IniRead($inipath, "macros", "1", "supercalafragelisticexpialido.ciaus")
$macropath=(@scriptdir &"\macros\" & $findmacro)
if fileexists($macropath) then
$editcmd=($medit & " " & $macropath)
GUICtrlSetData($desc,$txt11)
WinSetOnTop($txt3, "", 0)
run($editcmd)
else
GUICtrlSetData($desc,$txt12)
endif
Case $msg = $iButton
run($KEITH)
exit
Case $msg = $eButton
run($openhome)
exit
endselect
WEnd
endfunc

func openkmext()
$ask=MsgBox(32+4, $txt3,$txt13)
If $ask=7 Then
Exit
Else
run($openhome)
endif
endfunc

Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: JujuLand
Date: October 05, 2009 11:42AM

Quote
disrupted
autoit gets kmeleon locale language from prefs, in case others/else/english ..english locale is used embedded inside the autoit script (not externally... this is the only way to avoid problems with autoit..english must be embedded and not as an external file to avoid problems(over-zealous user deletes locale file etc)
I think it's the equal way I used. Haven't time now to test it, but some others will probably do it.

A+


Mozilla/5.0 (x11; U; Linux x86_64; fr-FR; rv:38.0) Gecko/20100101 Ubuntu/12.04 K-Meleon/76.0

Web: http://jujuland.pagesperso-orange.fr/
Mail : alain [dot] aupeix [at] wanadoo [dot] fr


Ubuntu 12.04 - Gramps 3.4.9 - Harbour 3.2.0 - Hwgui 2.20-3 - K-Meleon 76.0 rc


Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: disrupted
Date: October 06, 2009 04:40PM

welll, if no one wants to test; can i atleast have the locales translated.. i can't work with dummy text, need proper locales.. german, spanish french, polish for that text and i need russian in utf-8 format and i want to know if russian localised windows 98 can read and display utf-8

1=("K-Meleon Extensions Manager Error")
2=("Only execute the manager from inside k-meleon. ")
3=("K-meleon Extensions Manager")
4=("uninstall")
5=("edit macro")
6=("run installer")
7=("Note: K-meleon will be restarted on an uninstall/install")
8=("can't uninstall: malformed ini, please reinstall this extension or contact the author")
9=("The extension: ")
10=(" has been uninstalled successfully. ")
11=("macro editor mode: when done remember to save and restart k-meleon for changes to take effect")
12=("this extension does not include a macro")
13=("You don't have any installed extensions. Would you like to download extensions?")
14=("installed extensions:")
15=("install date:")

Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: JujuLand
Date: October 06, 2009 06:40PM

Here is the french translation.

1=("Erreur du Gestionnaire d'extension K-Meleon")
2=("Veuillez lancer le gestionnaire uniquement depuis K-meleon. ")
3=("Gestionnaire d'extension K-Meleon")
4=("Désinstaller")
5=("Editer la macro")
6=("Installer")
7=("Note: K-meleon sera redémarré après une (dés)installation")
8=("Désinstallation impossible: fichier ini corrompu, veuillez réinstaller ou contacter l'auteur de l'extension")
9=("L'extension: ")
10=(" a été correctement désinstaller. ")
11=("Edition de macro: n'oubliez pas d'enregistrer les modifications et ensuite de redémarrer K-Meleon pour que celles-ci soient prises en compte")
12=("Cette extension ne comporte pas de macro.")
13=("Vous n'avez installé aucune extension. Voulez-vous télécharger des extensions?")
14=("Extensions installées:")
15=("Date d'installation:")

A+


Mozilla/5.0 (x11; U; Linux x86_64; fr-FR; rv:38.0) Gecko/20100101 Ubuntu/12.04 K-Meleon/76.0

Web: http://jujuland.pagesperso-orange.fr/
Mail : alain [dot] aupeix [at] wanadoo [dot] fr


Ubuntu 12.04 - Gramps 3.4.9 - Harbour 3.2.0 - Hwgui 2.20-3 - K-Meleon 76.0 rc


Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: Matt
Date: October 06, 2009 06:59PM

disrupted, I will definitly test it but I don't have much time and null/nix/zero experience in compiling with autoit. I hope to manage it with Your detailed instruction posted in ext manager thread.
Here is my part:

1=("Błąd Menedżera Rozszerzeń K-Meleona")
2=("Wywołuj Menedżera tylko z menu K-Meleona. ")
3=("Menedżer Rozszerzeń K-Meleona")
4=("odinstaluj")
5=("edytuj makro")
6=("włącz instalator")
7=("Uwaga: K-Meleon zostanie ponownie uruchomiony przy (od)instalowaniu")
8=("odinstalowanie nie jest możliwe: plik ini jest wadliwy, spróbuj ponownie zainstalować rozszerzenie lub skontaktuj się z autorem")
9=("Rozszerzenie: ")
10=(" zostało pomyślnie odinstalowane. ")
11=("tryb edycji makra: pamiętaj o zapisaniu zmian i ponownym uruchomieniu K-Meleona, aby zmiany odniosły skutek")
12=("to rozszerzenie nie zawiera makra")
13=("Nie masz zainstalowanych rozszerzeń. Chcesz pobrać rozszerzenia?")
14=("zainstalowane rozszerzenia:")
15=("data instalacji:")

Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: JujuLand
Date: October 06, 2009 07:53PM

First correction, to avoid unneeded repeted lines:

1) use 'general.useragent.locale' instead of 'general.useragent.contentlocale', you will directly have the locale folder in $cmdline[2]
2) To be sure inifile is here, before the variables setting, test the presence of the inifile
3) It will allow anybody to add there own language translation, obviously supported by K-Meleon, for example pt-BR, pl-PL, ... and all the future languages supported without any au3 file modification.

Here is the part to modify (correct the inifile test, I don't know the au3 syntax):

if file($locales & $cmdline[2] & "\kmextman.ini")
$lang=$cmdline[2]
else
$lang=("en-US")
end

if $lang=("en-US") then
$txt1=("K-Meleon Extensions Manager Error")
$txt2=("Only execute the manager from inside k-meleon. ")
$txt3=("K-meleon Extensions Manager")
$txt4=("uninstall")
$txt5=("edit macro")
$txt6=("run installer")
$txt7=("Note: K-meleon will be restarted on an uninstall/install")
$txt8=("can't uninstall: malformed ini, please reinstall this extension or contact the author")
$txt9=("The extension: ")
$txt10=(" has been uninstalled successfully. ")
$txt11=("macro editor mode: when done remember to save and restart k-meleon for changes to take effect")
$txt12=("this extension does not include a macro")
$txt13=("You don't have any installed extensions. Would you like to download extensions?")
$txt14=("installed extensions:")
$txt15=("install date:")
;$txt16=()
;$txt18=()
;$txt19=()
;$txt20=()
else
$txt1=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "1", "kmextman")
$txt2=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "2", "kmextman")
$txt3=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "3", "kmextman")
$txt4=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "4", "kmextman")
$txt5=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "5", "kmextman")
$txt6=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "6", "kmextman")
$txt7=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "7", "kmextman")
$txt8=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "8", "kmextman")
$txt9=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "9", "kmextman")
$txt10=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "10", "kmextman")
$txt11=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "11", "kmextman")
$txt12=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "12", "kmextman")
$txt13=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "13", "kmextman")
$txt14=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "14", "kmextman")
$txt15=IniRead($locales & $lang & "\kmextman.ini", "kmextman", "15", "kmextman")
endif

Other thing : it's a really bad choice to put kmextman.exe in rootfolder. Its place ought to be something like Tools, no ?

I haven't read all the au3 file, but it seems that and inifile with for each file type an item giving the number of files, would allow to use iteration, to avoid repeted lines.

Example:

$findmacro=IniRead($inipath, "macros", "1", "supercalafragelisticexpialido.ciaus")
$findmacro2=IniRead($inipath, "macros", "2", "supercalafragelisticexpialido.ciaus")
....

A+


Mozilla/5.0 (x11; U; Linux x86_64; fr-FR; rv:38.0) Gecko/20100101 Ubuntu/12.04 K-Meleon/76.0

Web: http://jujuland.pagesperso-orange.fr/
Mail : alain [dot] aupeix [at] wanadoo [dot] fr


Ubuntu 12.04 - Gramps 3.4.9 - Harbour 3.2.0 - Hwgui 2.20-3 - K-Meleon 76.0 rc




Edited 4 time(s). Last edit at 10/06/2009 08:24PM by JujuLand.

Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: disrupted
Date: October 06, 2009 09:36PM

thank you so much alain..this will save a lot(A LOT!) of coding. you code is almost autoit ready smiling smiley just fileexists instead of file... hopefully international extman will be finished tomorrow and then capture plus will be next.

the reason for kmextman to be in root is because it has an uninstall function which better eliminates problems by seeing the directories directly from its location.. not that it's not doable if it's in tools folder but may cause some bugs and require additional coding.

i'm thinking about something and i need your opinion about it.. iniread can read any file regardless of extension.. so the locale strings for autoit can be combined inside macro kml file..maybe at the end after the translation strings for the macro.. is it a good idea to combine autotit locale with macroo in kml or better keep them separate?

thanks for translations in french and polish..still need deutsch and spanish cause i'd like to release with locales ready atleast for languages supported by kmeleon. i really need to know how windows9x can handle utf-8 files..because russian can't be translated in an ansi file(it will look like ???+).. the problem is can an an ansi compiled autoit3 read utf-8 ini.. does anyone know?.. maybe i'll go ask in russian forum

Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: JujuLand
Date: October 07, 2009 09:04AM

Quote
disrupted
the reason for kmextman to be in root is because it has an uninstall function which better eliminates problems by seeing the directories directly from its location.. not that it's not doable if it's in tools folder but may cause some bugs and require additional coding.

I had have the same problems with nsis. The unsetup, as created when setting up, refers to the rootfolder as base.

I don't remember exactly how I made it, (cmd file, or/and macro, and/or nsi file), but when setting up, I move (and rename, if I remember) unsetup to the folder Extensions I use with KMES.

When uninstalling, I move it to rootfolder before uninstalling. This is a bit different for KMES, as the uninstall are made after restarting K-Meleon, to avoid some problems, and to allow uninstalling more than one extension the same time.

Look for the source of KMES, you have a list of files and some can be displayed from the KMES pages.

Quote
disrupted
i'm thinking about something and i need your opinion about it.. iniread can read any file regardless of extension.. so the locale strings for autoit can be combined inside macro kml file..maybe at the end after the translation strings for the macro.. is it a good idea to combine autotit locale with macroo in kml or better keep them separate?

Yes, it could be made like this, but don't forget that, if items have the same structure, there is no header in kml files, and I suppose that you won't then be able to use iniread function. Other problem, items can use " delimiters, and I'm not sure that iniread can handle it.

You can try by adding an header in the klm file to see if it's ok, and don't makes some problems with K-Meleon, when reading the kml file. To avoid this type of problems, you can try to add a # before your header, but you will must see if there is no problems then with iniread.

Try it, but for me, no problems if there is a kml and ini file for the same extension.

Quote
disrupted
i really need to know how windows9x can handle utf-8 files..because russian can't be translated in an ansi file(it will look like ???+).. the problem is can an an ansi compiled autoit3 read utf-8 ini.. does anyone know?.. maybe i'll go ask in russian forum

For me, utf8 don't work with w9x version (see kml files).
But a way for russian is to use a compatable charset with ansi. I think there is one, because the nlf files aren't utf-8 compliant, and the setup displays in russian, if I remember.

After, for chinese, and other languages, I don't know if it exists.

A+


Mozilla/5.0 (x11; U; Linux x86_64; fr-FR; rv:38.0) Gecko/20100101 Ubuntu/12.04 K-Meleon/76.0

Web: http://jujuland.pagesperso-orange.fr/
Mail : alain [dot] aupeix [at] wanadoo [dot] fr


Ubuntu 12.04 - Gramps 3.4.9 - Harbour 3.2.0 - Hwgui 2.20-3 - K-Meleon 76.0 rc




Edited 1 time(s). Last edit at 10/07/2009 09:09AM by JujuLand.

Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: disrupted
Date: October 07, 2009 04:26PM

thanks alain, i think i'll keep the locales separate..better i think case one messes up the macro kml , it won't then affect the autoit locale.

is macro feminine..i think it should be masculine? because ends in o like italian so editez le macro is better than editez la macro?

for example(italian) io voglio una (feminine) macro.. doesn't sound right or it doesn't matter in french?

Options: Reply•Quote
Re: autoit locale(translation-support) test
Posted by: JujuLand
Date: October 07, 2009 04:48PM

La macro is really better. May I have made some typo ?

A+


Mozilla/5.0 (x11; U; Linux x86_64; fr-FR; rv:38.0) Gecko/20100101 Ubuntu/12.04 K-Meleon/76.0

Web: http://jujuland.pagesperso-orange.fr/
Mail : alain [dot] aupeix [at] wanadoo [dot] fr


Ubuntu 12.04 - Gramps 3.4.9 - Harbour 3.2.0 - Hwgui 2.20-3 - K-Meleon 76.0 rc


Options: Reply•Quote


K-Meleon forum is powered by Phorum.