Setting the Focus on a Textbox

Plateforme Level Extreme

Abonnement

Profil corporatif

Produits & Services

Support

Légal

English

Setting the Focus on a Textbox

Message

26/11/2001 18:02:56

Leroy Jackson
Vestcom International
Little Rock, Arkansas, États-Unis

26/11/2001 13:49:52

Rodolfo Duarte
Computar
Ribeirão Preto, Brésil

Information générale

Forum:

Visual FoxPro

Catégorie:

Gestionnaire d'écran & Écrans

Titre:

Re: Setting the Focus on a Textbox

Divers

Thread ID:

00585864

Message ID:

00586078

Vues:

Thank you for The thread. That is just what I need. I made some minor adjustments and it works fine.

So it will help others out put my code here:

** in the init of My Form Class
** I have created a property called FirstControl
** assined = '' from the begining

LOCAL lnIndex
lnIndex = 1000
FOR EACH oCtl IN THIS.CONTROLS
	IF PEMSTATUS(oCtl,'TabIndex',5)
		IF oCtl.TABINDEX < lnIndex
			lnIndex = oCtl.TABINDEX
			THIS.FirstControl = oCtl.NAME
		ENDIF
	ENDIF

NEXT

Then in my button class I put

** in the click of the button (New/Save & Edit/Cancel)

LOCAL lFirst
lFirst = EVAL("Thisform." + THISform.FirstControl)
lFirst.SETFOCUS

Thanks So much

What is Wisdom?
Wisdom - The ability to respond to any situation according to God's Plan.
Therefore:
USE Wisdom IN Everything ORDER priority AS Knowledge
SELECT Knowledge
BROWSE FOR Understanding WHERE Wisdom=Guide

LeRoy Jackson

Répondre

Fil

Voir

Click here to load this message in the networking platform