Форум: "Начинающим";
Текущий архив: 2006.10.22;
Скачать: [xml.tar.bz2];

Вниз

Memo1.Text[1]:=   Найти похожие ветки 

← →
Alral ©   (2006-10-02 22:04) [0]

Kak mozhno podobno sintaksisu v zagolovke prisvaivat znachenija otdelnim simvolam Memo1.Text? Kogda probuju tak, kak v zagolovke, oshibka"Left side cannot be assigned to"

---

← →
Gydvin ©   (2006-10-02 22:09) [1]

Значит использовать промежуточный буфер

---

← →
Leonid Troyanovsky ©   (2006-10-02 22:17) [2]

> Alral ©   (02.10.06 22:04)


with Memo1 do
 begin
   SelStart := 1;
   SelLength := 1;
   SelText :=
 end;


--
Regards, LVT.

---

← →
Alral ©   (2006-10-02 22:17) [3]

To est?
Ja snachala proboval naprjamuju(Memo1.Text[n]:=Succ(Memo1.Text[n])). Ne proshlo,
poproboval objavit" peremennuju(var s: string;...s:=Memo1.Text; Succ(s);    Memo1.Text[n]:=s;  , ne prohodit(Na videlennom tekste voznikaet oshibka "Left side cannot be assigned to"). A cherez bufer, eto kak? Mozhete skazat"?

---

← →
Alral ©   (2006-10-02 22:19) [4]

Predidushii post dlja Gydvin,
> Leonid Troyanovsky ©   (02.10.06 22:17) [2]
>
>
> > Alral ©   (02.10.06 22:04)
>
>
> with Memo1 do
>  begin
>    SelStart := 1;
>    SelLength := 1;
>    SelText :=
>  end;
>
>
> --
> Regards, LVT.


SelStart, SelLength, SelText ochen medlenno. podhodit dlja nebolshih strok, no skorost" ostavljaet zhelat luchego. Ju dumal posimvolno budet bistree.

---

← →
TUser ©   (2006-10-02 22:33) [5]

> SelStart, SelLength, SelText ochen medlenno.

Lines.BeginUpdate/EndUpdate

---

← →
Alral ©   (2006-10-02 22:36) [6]

A potochnee nelzja? ja nemnogo ne ponjal. Pro Lines.BeginUpdate v Help ne nashel(mozhet ploho iskal, ne znaju). No eto ja vpervie vizhu, i Lines svoistvo kazhetsja dlja linii, a ne dlja simvolov.

---

← →
Leonid Troyanovsky ©   (2006-10-02 22:50) [7]

> Alral ©   (02.10.06 22:36) [6]
> A potochnee nelzja? ja nemnogo ne ponjal. Pro Lines.BeginUpdate
> v Help ne nashel(mozhet


TStrings.BeginUpdate

--
Regards, LVT.

---

← →
Gydvin ©   (2006-10-02 23:05) [8]

> poproboval objavit" peremennuju(var s: string;...s:=Memo1.
> Text; Succ(s);    Memo1.Text[n]:=s;  , ne prohodit

читать про отличие char (Text[n]) от string (var s: string);

в твоем случае юзать либо [2] либо

var
i:integer;
s:string;
begin
i:=memo1.selstart;
s:=memo1.text;
s[1]:="a";
memo1.text:=s;
memo1.seltext:=i;
s:="";
end;

---

Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.10.22;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.04 c