Srodne teme

08.06.2006. Mouse pointer
12.09.2002. **pointer
15.01.2002. SHBrowseForFolder & pidlRoot
17.02.2005. VB i VC++ DLL
21.04.2002. vise TMemo komponenata u jedan fajl.
28.04.2002. Greske pri kompajliranja
07.02.2003. String i memo.lines
28.05.2003. 3 pitanja
23.11.2003. prosireno memo polje
10.04.2004. wml + cirilica = Ћиp&#x..

Navigacija

Brisanje liste

Lista poslednjih: 16, 32, 64, 128 poruka.

Memo & pointer

[es] :: Pascal / Delphi / Kylix :: Memo & pointer	[ Pregleda: 1412 \| Odgovora: 4 ] > FB > Twit	Postavi temu Odgovori

Autor

Sole_boy

Član broj: 2486
Poruke: 58
*.ptt.yu

Profil

Memo & pointer

^{16.05.2002. u 10:35}

Postovanje,

treba mi code koji ce mi recimo
kada dodajem pomocu button-a neki tekst u memo
(memo1.lines.add('neki tekst') prvo naci poziciju
pointera |, pa zatim iza njega dodati a ne stalno
jedno ispod drugog?

Nadam se da ste me razumeli
Hvala.

^{16.05.2002. u 10:35}

Riste Pejov
Team Leader/Senior Software Developer @
Ein-Sof ltd Skopje
Skopje, Macedonia

Član broj: 128
Poruke: 571
212.110.78.*

Jabber: richie@bagra.net.mk
ICQ: 154236769
Sajt: riste.softver.org.mk

Profil

Re: Memo & pointer

^{16.05.2002. u 14:12}

Ubaci na formu memo, editbox i button,
na onClick buttona, ide nesto slicno ovome:

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
   i:word;
   CPos:word;
   MText:string;
begin
CPos:=Memo1.SelStart;
MText:=memo1.Text;
insert(edit1.Text,MText,Cpos+1);
memo1.Text:=MText;
end;

Ovaj kod ubacije text iz editboxa na posiciju caret-a u memo

People who think they know everything tend to irritate those of us who do.

^{16.05.2002. u 14:12}

Sole_boy

Član broj: 2486
Poruke: 58
*.ptt.yu

Profil

Re: Memo & pointer

^{23.05.2002. u 00:03}

Postovanje,

ovaj code lepo radi samo ima jednu gresku koju ne mogu da provalim
kad god dodam nesto ono POINTER stavi na pocetak teksta, kako to da ispravim?

Hvala!

^{23.05.2002. u 00:03}

Re: Memo & pointer

^{23.05.2002. u 12:38}

Kod radi, samo ti si prevideo da kad memo1 nema focus onda selstart je -1,
zato samo izmeni malo taj isti kod.

Deklariraj
CPos:word; kao globalnu

A ovaj red

Code:
CPos:=Memo1.SelStart;

samo prebaci u Memo1.OnExit;

People who think they know everything tend to irritate those of us who do.

^{23.05.2002. u 12:38}

Sole_boy

Član broj: 2486
Poruke: 58
*.ptt.yu

Profil

Re: Memo & pointer

^{23.05.2002. u 19:49}

Ne vredi, ovo ne moze ni da radi
stavio sam CPos:word; kao globalnu promenljivu.
i tamo memo1.onexit;
ali ne vredi, ne moze da se iskompajlira

>> Not Enough Actual Parametars << memo1.onexit;|

^{23.05.2002. u 19:49}

[es] :: Pascal / Delphi / Kylix :: Memo & pointer

[ Pregleda: 1412 | Odgovora: 4 ] > FB > Twit

Srodne teme

08.06.2006. Mouse pointer
12.09.2002. **pointer
15.01.2002. SHBrowseForFolder & pidlRoot
17.02.2005. VB i VC++ DLL
21.04.2002. vise TMemo komponenata u jedan fajl.
28.04.2002. Greske pri kompajliranja
07.02.2003. String i memo.lines
28.05.2003. 3 pitanja
23.11.2003. prosireno memo polje
10.04.2004. wml + cirilica = Ћиp&#x..

Navigacija

Brisanje liste

Lista poslednjih: 16, 32, 64, 128 poruka.