Bugs, Errors, Questions and all the other stuff

[SonG0han]

hi AMS5 Team!
I have noticed some things I want to tell you. I dont know if they are already known or not, pls take a look at it. :)

i put everything from bugs, errors and Questions in here to keep the forums ordered. I think it doesnt look "so good" if there are 20 threads from the same user and everyone has only a minor question in it, right? :rolleyes:

here we go...

1. if i enter text in an input field (not in ams runtime, in designtime) they get screwed up. text is mixed and its just crappy black text you cant read. maybe there is a way to fix it?

2. if I use a web object and put the url in an input field (like in the template browser) you get the URLs of iFrames in the inputfield. is there a way to disable this or does a workaround exist?

3. if I execute a link which opens a new window in a web-object with javascript nothing happen

4. it seems the + key is not recognized by AMS5. the following code example should do something if you hit the + key but nothing happens. if i use other keys it works.

if (e_Key == 43) then
----ACTION HERE
end


5. Just added some bookmarks to my global functions but if i leave the codeeditor and come back all bookmarks are gone. tried it several times. can you confirm this?

thats all. Thank you for your time and patience. :)

[Lorne]

In answer to 4:

The virtual key code for the + key on the numeric keypad is 107.

The code for the + key on the main part of the keyboard is actually a shifted =, so in other words it's 187 when the shift key is held down.

[SonG0han]

oh, forgot that with the shifted = on english keyboards! :o
i have a + key on my german keyboard, with shift I get a * and with altGr i get ~. i tried this +-key and the one on the numpad and thought that is the + (ASCII 43 in the table in helpfile)

shift + = on my keyboard is an question mark (?). i try if 187 is the +-key on my keyboard tomorrow, time for bed now ;)

Thank you very much!! :)

[SonG0han]

hi!
I hope someone can help me, i have a problem with the following code:

-- DATEN-Datei einlesen (Section Names)
-- ALT: DATA = TextFile.ReadToString(_SourceFolder.."\\DATA.ini");
-- Tabelle Leeren
DATA_Sections = {};

DATA_Sections = INIFile.GetSectionNames(_SourceFolder.."\\DATA.ini");
-- Namen der neuen Kategorie abfragen
NewCatName = Dialog.Input("Enter name of new Category", "Category Name:", "", MB_ICONQUESTION);
-- Prüfen ob die Kategorie schon existiert
-- (Suche in strDATA - siehe oben)
-- ALT: SearchResult = String.Find(DATA, NewCatName, 1, false);
strDATA_Sections = "";
strDATA_Sections = Table.Concat(DATA_Sections, ";", 1, TABLE_ALL);
Dialog.Message("DEBUG", "Daten: "..strDATA_Sections);
CatSearchResult = String.Find(strDATA_Sections, NewCatName, 1, false);
Dialog.Message("DEBUG", "Daten: "..CatSearchResult);
-- Wenn Sie noch nicht existiert am Ende des Files anhängen
if (CatSearchResult == -1) then
string = "\r \r["..NewCatName.."]\r"
Dialog.Message("DEBUG", "Daten: "..string);
TextFile.WriteFromString(_SourceFolder.."\\DATA.ini", string, true);
Dialog.Message("DEBUG", "Daten: ".."INI geändert!");
else
result = Dialog.Message("Error", "This Category Name does already exist!", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
end



it creates a new section in an ini file if it does not already exist (sad that ther is no actoin for that in the INI section)
the first time it works but if i push the button a 2nd time i get this error message

attempt to index a string value
but why? i tried to empty the table and the variables but it did not change anything :(


btw: if i add \n or \r to a string i dont have a new line in the textfiles i write. how can i add a new line with the write textfile command?

hope someone knows the answer, thx in advance! :)

[Stefan_M]

Hi,

try the following code.
I didn't find out why your problem exists but I know a solution for you.


DATA_Sections = INIFile.GetSectionNames(_SourceFolder.."\\DATA.ini");
-- Namen der neuen Kategorie abfragen
NewCatName = Dialog.Input("Enter name of new Category", "Category Name:", "", MB_ICONQUESTION);
-- Prüfen ob die Kategorie schon existiert
CatSearchResult= false;
for count in DATA_Sections do
if (DATA_Sections[count]==NewCatName) then
CatSearchResult = true
else
CatSearchResult = false
end
end
if (CatSearchResult == false) then
string = "\["..NewCatName.."\]";
TextFile.WriteFromString(_SourceFolder.."\\DATA.ini", "\r\n", true);
TextFile.WriteFromString(_SourceFolder.."\\DATA.ini", string, true);
else
result = Dialog.Message("Error", "This Category Name does already exist!", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
end




Greatings from Salzburg/Austria
Stefan

[SonG0han]

thanks, i will try that! :)
i already thought about using the "for x in table do" method but i thought it would be easier to make a delimited string out of the table, its less to code

but why does it not work with a del. list of the tablecontents? anyone knows? :confused:

[SonG0han]

hello again.
i didnt test it in the app where i needed the code yet but i used it in another project and think i found a little "error" in it.

for count in DATA_Sections do
if (DATA_Sections[count]==NewCatName) then
CatSearchResult = true
else
CatSearchResult = false
end
end

could it be that this doesnt work?
for every entry the code between do and end is evulated, right? so if its true at the first entry it will get false if it reaches the last? -> so everytime only the last entry counts - right or not? :confused:

Below you find the code of my "Add to Favorites" function. it adds an entry to a INI file and checks if it is already present. i used BREAK to exit if the result is TRUE - its true when it is already in the file and then it should not add it again.

if you have some time I would be very happy about suggestions or tips to improve the code but as far as I can see it works. :)

-- AddToFavorites Function
function AddToFavorites()
CurrentURL = Web.GetURL("Browser");
CurrentURLName = Dialog.Input("Enter the name for your new Favorites entry", "Name of current Page:", "", MB_ICONQUESTION);
if (CurrentURLName == "") or (CurrentURLName == "CANCEL") then
Dialog.Message("Error", "You must enter a name for the new entry.", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
else
-- Prüfen ob der Name schon in der INI vorhanden ist! (groß-/klein muß egal sein!)
--> INI einlesen und nach dem neuen Eintrag suchen:
tblFavoritesNames = {};
tblFavoritesNamesCount = Table.Count(tblFavoritesNames);
if tblFavoritesNamesCount > 0 then
Count = 1;
while Count <= tblFavoritesNamesCount do
Table.Remove(tblFavoritesNames, Count);
Count = Count + 1
end
end
tblFavoritesNames = INIFile.GetValueNames(_SourceFolder.."\\Settings.ini", "Favorites");

SearchResult = false;
for count in tblFavoritesNames do
if (String.Lower(tblFavoritesNames[count]) == String.Lower(CurrentURLName)) then
SearchResult = true
break
else
SearchResult = false
end
end
if (SearchResult == false) then
ListBox.AddItem("Favorites", CurrentURLName, CurrentURL);
INIFile.SetValue(_SourceFolder.."\\Settings.ini", "Favorites", CurrentURLName, CurrentURL);
else
Dialog.Message("Error", "An entry with this name does alredy exist!\nPlease chose another name.", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
end
end
end

NOTE: if I dont delete the tableentries it doesnt seem to work. so you have to delete the table entries every time?

bye *waves*

[SonG0han]

hmm i got some errors if there are no entries and I tried to prevent this and added some new lines of code but now it lets me only add 1 entry if the favorites section in the ini is empty.

i dont get any error messages. I try to find the problem but I hope someone can help me and give me a tip ;)


new code (i belive it could be much better)

-- AddToFavorites Function
function AddToFavorites()
CurrentURL = Web.GetURL("Browser");
CurrentURLName = Dialog.Input("Enter the name for your new Favorites entry", "Name of current Page:", "", MB_ICONQUESTION);
if (CurrentURLName == "") or (CurrentURLName == "CANCEL") then
Dialog.Message("Error", "You must enter a name for the new entry.", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
else
-- Prüfen ob der Name schon in der INI vorhanden ist! (groß-/klein muß egal sein!)
--> INI einlesen und nach dem neuen Eintrag suchen:
tblFavoritesNames = {};
tblFavoritesNamesCount = 0;
tblFavoritesNamesCount = Table.Count(tblFavoritesNames);
if tblFavoritesNamesCount > 0 then
Count = 1;
while Count <= tblFavoritesNamesCount do
Table.Remove(tblFavoritesNames, Count);
Count = Count + 1
end
end
tblFavoritesNames = INIFile.GetValueNames(_SourceFolder.."\\Settings.ini", "Favorites");

SearchResult = false;

if (tblFavoritesNames == nil) then
tblFavoritesNames = {};
end
tblFavoritesNamesCount = 0;
tblFavoritesNamesCount = Table.Count(tblFavoritesNames);

if (tblFavoritesNamesCount ~= 0) then
for count in tblFavoritesNames do
if (String.Lower(tblFavoritesNames[count]) == String.Lower(CurrentURLName)) then
SearchResult = true
break
else
SearchResult = false
end
end
else
if (SearchResult == false) then
ListBox.AddItem("Favorites", CurrentURLName, CurrentURL);
INIFile.SetValue(_SourceFolder.."\\Settings.ini", "Favorites", CurrentURLName, CurrentURL);
else
Dialog.Message("Error", "An entry with this name does alredy exist!\nPlease chose another name.", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
end
end

end
end

[Stefan_M]

Hi,

I didn't test it so there was an error.


for count in DATA_Sections do
if (DATA_Sections[count]==NewCatName) then
CatSearchResult = true
else
CatSearchResult = false
end
end


Change it to

CatSearchResult = false;
for count in DATA_Sections do
if (DATA_Sections[count]==NewCatName) then
CatSearchResult = true;
end
end


you do not need the "else" part

Stefan

[SonG0han]

thanks :)

any other suggestions for the code above? :rolleyes:

[Stefan_M]

Hi SonG0han,

try the following solution.

Stefan