From 8bfe0d0eea91216df109bb6129a35e016a03103e Mon Sep 17 00:00:00 2001 From: Eric Cholis Date: Fri, 20 May 2016 09:09:47 -0400 Subject: [PATCH] Visual FoxPro Multiple Visual FoxPro samples, taken from https://en.wikipedia.org/wiki/Visual_FoxPro --- v/visualfoxpro.prg | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 v/visualfoxpro.prg diff --git a/v/visualfoxpro.prg b/v/visualfoxpro.prg new file mode 100644 index 00000000..906451d7 --- /dev/null +++ b/v/visualfoxpro.prg @@ -0,0 +1,17 @@ +* Message Box: +MESSAGEBOX("Hello World") + +* Print to screen: +? "Hello World" + +* GUI: +loForm = CREATEOBJECT("HiForm") +loForm.Show(1) + +DEFINE CLASS HiForm AS Form + AutoCenter = .T. + Caption = "Hello, World" + + ADD OBJECT lblHi as Label ; + WITH Caption = "Hello, World!" +ENDDEFINE