home *** CD-ROM | disk | FTP | other *** search
/ Draw 3 / Draw3.iso / fpc2.dxr / 00062.ls < prev    next >
Encoding:
Text File  |  2000-02-17  |  115 b   |  7 lines
  1. on mouseUp
  2.   global cod, nom
  3.   set cod to "de"
  4.   set nom to the text of field "demos6"
  5.   seleccionar(cod, nom)
  6. end
  7.