Control won't give up focus? - Level Extreme

Plateforme Level Extreme

Abonnement

Profil corporatif

Produits & Services

Support

Légal

English

Control won't give up focus?

Message

De

14/09/2001 08:01:18

Steve Kramer
Kramer & Kramer Design
Clearwater, Floride, États-Unis

À

14/09/2001 07:51:39

Steve Kramer
Kramer & Kramer Design
Clearwater, Floride, États-Unis

Information générale

Forum:

Visual FoxPro

Catégorie:

Codage, syntaxe et commandes

Titre:

Re: Control won't give up focus?

Divers

Thread ID:

00556385

Message ID:

00556386

Vues:

19

Here's my button code:

isediting = .T.
SELECT MASTER
BLANK FIELD master.closed
* Set form backgrnd color
* Light gray if open record, Dark gray if closed record
IF EMPTY(master.closed)
	THISFORM.BackColor = RGB(192,192,192)
ELSE   
	THISFORM.BackColor = RGB(160,160,160)
ENDIF
THISFORM.Caption = "EDITING     "+mast_cap
THISFORM.Refresh
THISFORM.Edit2.SetFocus

Steve Kramer
Kramer & Kramer Design
"Home of Go Cartoons"
Web Site: www.stephenkramer.com
Would you believe Far Side Lite?
More than 270 original cartoons.

Click here to load this message in the networking platform