begin process at 2012 02 09 08:27:45
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Delphi

 > 

Archives

 > 

Texte

 > 

Position du Curseur dans un TEdit


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Position du Curseur dans un TEdit

dimanche 17 juillet 2005 à 17:40:36 | Position du Curseur dans un TEdit

tichau4

Bonjour,

Est-il possible de connaitre la position du curseur dans un composant TEdit, et de la changer, si non existe t-il un composant capable de faire ce genre de chose.

Merci d'avance.

lundi 18 juillet 2005 à 07:30:18 | Re : Position du Curseur dans un TEdit

alexis2015

Slt,
Voilà ce ke je te propose sur un Tbutton;

procedure TForm1.Button1Click(Sender: TObject);
var cPos : TPoint;
begin
cPos:=Mouse.CursorPos; // Tu récolte sa position
edit1.text:=inttostr(MPos.X)+' - '+inttostr(mpos.y); // Et tu l'écrit dans un TEdit
end;


Sur un TEDit c encore + simple !

procedure TForm1.Edit1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
edit1.text:=inttostr(X)+' - '+inttostr(y);
// Ici, j'utilise X et Y car ce sont des variable fournie par la procedure et qui renvoie directement la position du curseur
end;


Maintenant si tu vx positioner ton curseur à un endroit préci :
(de nouveau sur un TButton)

procedure TForm1.Button2Click(Sender: TObject);
var cPos : TPoint;
begin
cpos.X:=200; // Tu attribues tes coordonées
cpos.Y:=200;
Mouse.CursorPos:=cPos; // et tu les aplliquent au curseur
end;


J'épère que ca rep à ta question.
Si oui, valide la réponse

Alexis

lundi 18 juillet 2005 à 07:35:59 | Re : Position du Curseur dans un TEdit

alexis2015

Oups, Une petite erreur c'est glissée dans la première source :

Il faut remplacer les "MPos.X" et "MPos.y" par la variable déclarée à savoir "cPos" et pas "MPos".

Donc ca donne :

edit1.text:=inttostr(cPos.X)+' - '+inttostr(cPos.y);

Déso


lundi 18 juillet 2005 à 12:26:32 | Autre manière pour trouver et changer la position de la souris dans unTEdit

grandvizir

var P, PositionDansEdit : TPoint; begin GetCursorPos(P); PositionDansEdit:=Edit1.ScreenToClient(P); end; Et inversement: var P : TPoint; begin P:=Edit1.ClientToScreen(Point(X,Y)); SetCursorPos(P); end; C'est une autre manière (aux imperfections live près)...
lundi 18 juillet 2005 à 13:05:33 | Re : Position du Curseur dans un TEdit

alexis2015

Je ne connaissais pas cette méthode, très très intéressant

Alexis

lundi 18 juillet 2005 à 16:07:24 | Re : Position du Curseur dans un TEdit

Kenavo

Réponse acceptée !
Salut,

Si c'est la position du curseur d'édition du TEdit que tu veux connaîte, utilise SelStart :

SelStart, propriété (TCustomEdit)

Représente la position du premier caractère sélectionné dans le texte.

Syntaxe Delphi :
property
SelStart: Integer;
Syntaxe C++ :
__property
int SelStart = {read=GetSelStart, write=SetSelStart, nodefault};

Description

Utilisez SelStart pour déterminer la position du premier caractère sélectionné, où 0 représente le premier caractère. Si aucun texte n'est sélectionné, SelStart indique la position du curseur. Affectez une valeur à SelStart pour retirer la sélection en cours et positionner le curseur immédiatement avant le caractère indiqué.

Pour sélectionner une portion de texte particulière, affectez d'abord une valeur à SelStart pour positionner le curseur, puis affectez une valeur à SelLength pour étendre la sélection.


Ken@vo

Code, Code, Codec !

mardi 19 juillet 2005 à 00:53:24 | Re : Position du Curseur dans un TEdit

tichau4

désolé alexis2015, je me suis mal exprimer le curseur dont je parlai était celui de l'Edit, pas le curseur de la souris.

Merci kan meme.

Pour SelStart quand j'affecte une valeur :

Edit1.SelStart:=2;

rien ne se passe ? prk?

Je voudrai kan je clique sur un bouton, le curseur de l'edit se mette a un endroit précis par exemple avant le 3eme cractère.
mardi 19 juillet 2005 à 10:31:10 | Re : Position du Curseur dans un TEdit

Kenavo

Réponse acceptée !
Il ne se passe rien car c'est ton bouton qui détient le focus. Il faut écrire :

Edit1.SetFocus;
Edit1.SelStart := 2;

Ken@vo

Code, Code, Codec !

mardi 19 juillet 2005 à 19:17:22 | Re : Position du Curseur dans un TEdit

tichau4

OK

Merci beaucoup ca marche.


Cette discussion est classée dans : composant, curseur, position, tedit


Répondre à ce message

Sujets en rapport avec ce message

Position du curseur clavier dans un Tedit ? [ par N_M_B ] Salut !!! je voudrais simplement savoir comment connaitre la position du curseur clavier dans un Tedit (genre:position=3 c.a.d apres 3 caractères !) composant TImage et TEdit [ par othland ] salut tout le monde!j'ai 2 petites questions : 1- dans une fenêtre, j'ai plusieurs labels et quand je rajoute un composant TImage pour mettre une imag Position du curseur [ par speederman_ch ] Bonjour à tous,Comment capter un évènement de la souris en dehors de la fenêtre d'une application (Delphi)Comme  :  Quel est sa  position              Connaître l'origine d'une action sur un composant (utilisateur ou code) [ par orelien ] Bonjour,Je prend le cas d'un composant TEdit sur lequel une actio est placée sur son évènement OnChange.Comment faire pour contrôler si c'est l'utiisa Valider et curseur! [ par darky93 ] Bonjour Voilà j’ai des TEdits et je voudrais lorsqu’ on presse Entrée et qu’on se trouve dans certain de ces TEdit que cela face la même action qu’un Curseur dans les TEdit [ par m_cyril1 ] Dans un de mes programmes il faudrait que le curseur soit placé dans un TEdit spécifique. <FONT face=Arial size Tchart position du curseur [ par yvessimon ] Avec Teechart est-il possible de récupérer la position de la souris dans le repère définit dans TeeChart, avec la version fournie dans DELPHI. Ce qui synedit et position du curseur!!! [ par saravana ] bonjour voila j'ai un synedit et je ne sais pas comment faire: lorsque je clik sur "add button" (exemple)  le curseur se positionne automatiquement à [Composant] créé dans le code [ par ffomnislash ] Bonjour , Je me heurte à un petit probleme en Delphi et mes recherches ne donne rien de bien concluant. J'ai besoin d'avoir un nombre variable de T Conserver la position de l'enregistrement dans un DBGrid [ par babylone ] boujour à tous,Y'a t-il une possibilité de conserver la position du curseur d'un DBgrid sur un enregistrement sélectionné. ???En fait une fenêtre appa


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,343 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales