layout of code

Hi,

can someone set this code out for me below so it works.

  if UpperCase(form1.adotable2.Fields[N].AsString) = UpperCase('12 Month)
+ UpperCase(form1.adotable2.Fields[j].AsString) = UpperCase('Sale ok') then
      inc(twelve1);
iplayAsked:
Who is Participating?
 
Geert GOracle dbaCommented:
are you doing this in a procedure of form1 ?
then do not use form1 !

and otherwise pass the adotable as a parameter to the procedure

if SameText(AdoTable2.Fields[N].AsString, '12 Month') and
  SameText(AdoTable2.Fields[j].AsString, 'Sale ok') then
  inc(twelve1);
0
 
iplayAuthor Commented:
No im doing this on form 13

0
 
iplayAuthor Commented:
Thanks, works fine, cheers
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.