Elseif

what do you mean?
You can write:
Code: Select all
if something then
begin
some code
end
else if somethingelse then
begin
some code
end;
I have tried that at the script error out at the first else if. See code below. if I just use plan if it works fine.
Code: Select all
if Value <> '' then
begin
if RegExprSetExec('drama',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Drama');
else if RegExprSetExec('comedy',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Comedy') ;
else if RegExprSetExec('romance',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Romance') ;
else if RegExprSetExec('animation',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Animation');
else if RegExprSetExec('action.*adventure',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Action/Adventure') ;
else if RegExprSetExec('anime',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Anime') ;
else if RegExprSetExec('fantasy',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Fantasy');
else if RegExprSetExec('science.*fiction',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Sci-Fi');
else if RegExprSetExec('comic.*book',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Comic book');
else if RegExprSetExec('family',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Family');
end;
Hi,
Do not put ; before else :
Soulsnake.
Do not put ; before else :
Code: Select all
if Value <> '' then
begin
if RegExprSetExec('drama',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Drama')
else if RegExprSetExec('comedy',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Comedy')
else if RegExprSetExec('romance',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Romance')
else if RegExprSetExec('animation',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Animation')
else if RegExprSetExec('action.*adventure',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Action/Adventure')
else if RegExprSetExec('anime',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Anime')
else if RegExprSetExec('fantasy',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Fantasy')
else if RegExprSetExec('science.*fiction',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Sci-Fi')
else if RegExprSetExec('comic.*book',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Comic book')
else if RegExprSetExec('family',AnsiLowerCase(Value)) = True then
SetField(fieldCategory, 'Family');
end;
-
- Posts: 764
- Joined: 2007-04-28 05:46:43
- Location: Italy