zdanie

0

Jak wyszukać w memo jakieś zdanie, a następnie je edytować???

0

FOR i:=0 to memo1.lines.count-1 do
If pos(memo1.lines[i],'memo1')>0 then
begin
Memo1.selStart:=pos(memo1.lines[i],'Memo1');
Memo1.SelLength:=5;
Memo1.SelText:='zdanie hehehe'
end;

||===

0

kurde jakos tak :[
zedytowac do poprawnosi potrafisz :(--||===

0

werw0e napisał:
&gtFOR i:=0 to memo1.lines.count-1 do
&gtIf pos(memo1.lines[i],'memo1')&gt0 then
....................
&gtMemo1.selStart:=pos(memo1.lines[i],'Memo1');

Pos ma odwrotne parametry:
Pos('Memo1', memo1.lines[i]);--Vogel [Delphi 6 PE]

I TY możesz nauczyć się grać w bierki!

0

no widzisz dlaczego nie dzialalo :)
--||===

1 użytkowników online, w tym zalogowanych: 0, gości: 1