Localization / Using localized strings |
"common.accept" = "OK" "common.cancel" = "Cancel" "common.yes" = "Yes!" "common.no" = "No!"
"customer.mainwindow.title" = "Customers" "customer.listwindow.title" = "Customer List" "customer.l_custnum" = "Number:" "customer.l_custname" = "Name:" "customer.c_custname" = "The customer name" "customer.q_delete" = "Do you want to delete this customer?"
fglrun.localization.file.count = 1 fglrun.localization.file.1.name = "common.42s"
Remark: The 'customer' string file does not have to listed in FGLPROFILE since it is loaded as it has the same name as the program.
ACTION DEFAULTS ACTION accept (TEXT=%"common.accept") ACTION cancel (TEXT=%"common.cancel") END LAYOUT (TEXT=%"customer.mainwindow.title") GRID { [lab1 ] [f01 ] [lab2 ] [f02 ] } END END ATTRIBUTES LABEL lab1: TEXT=%"customer.l_custnum"; EDIT f01 = FORMONLY.custnum; LABEL lab2: TEXT=%"customer.l_custname"; EDIT f02 = FORMONLY.custname, COMMENT=%"customer.c_custname"; END
MAIN DEFINE rec RECORD custnum INTEGER, custname CHAR(20) END RECORD OPEN FORM f1 FROM "customer" DISPLAY FORM f1 INPUT BY NAME rec.* ON ACTION delete MENU %"customer.mainwindow.title" ATTRIBUTES(STYLE="dialog", COMMENT=%"customer.q_delete") COMMAND %"common.yes" COMMAND %"common.no" END MENU END INPUT END MAIN