Скачать: CL | DM;

PChar и Enter   Найти похожие ветки 

← →
mate ©   (2003-01-24 13:41) [0]

Как мне преобразовать текст содержащий симолы #13#10 (ввод) в PChar , что бы эти же символы (#13#10) остались?

---

← →
Игорь Шевченко ©   (2003-01-24 13:45) [1]

А они не остаются ?

---

← →
Виктор Щербаков ©   (2003-01-24 13:47) [2]

Так же, как и текст не содержащий этих символов :)

---

← →
mate ©   (2003-01-24 13:47) [3]

В том то всё и дело что нет...

---

← →
Виктор Щербаков ©   (2003-01-24 13:48) [4]

гони код

---

← →
mate ©   (2003-01-24 13:53) [5]

У меня есть Memo в который я вношу текст, затем
Pchar(form1.memo1.text)
или
Pchar(form1.memo1.lines.text)
в результе получается текст одной строкой без символов ввода.

---

← →
Reindeer Moss Eater   (2003-01-24 13:55) [6]

Так вопрос-то другой совершенно вырисовывается!

---

← →
Игорь Шевченко ©   (2003-01-24 13:55) [7]

А если просто var s : string; s := form1.memo1.lines.text;
Они там есть ?

---

← →
mate ©   (2003-01-24 14:03) [8]

var s : string; s := form1.memo1.lines.text;
Там они есть.

---

← →
Anatoly Podgoretsky ©   (2003-01-24 14:09) [9]

Так это же свойство, что же ты к нему применяешь эту функцию

---

← →
mate ©   (2003-01-24 14:13) [10]

Я не к ниму применяю функцию , а просто беру текст из Мемо в типе PChar. Некоторые процедуры используют параметры PChar вот мне и надо передать туда текст из Мемо.

---

← →
Reindeer Moss Eater   (2003-01-24 14:15) [11]

TCustomMemo.WantReturns
Determines whether the user can insert return characters into the text.

property WantReturns: Boolean;

Description

Set WantReturns to True to allow users to enter return characters into the text. Set WantReturns to False to allow the form to handle return characters instead.

For example, in a form with a default button (such as an OK button) and a memo control, if WantReturns is False, pressing Enter chooses the default button. If WantReturns is True, pressing Enter inserts a return character in the text.

Note: If WantReturns is False, users can still enter return characters into the text by pressing Ctrl+Enter.

---

← →
Игорь Шевченко ©   (2003-01-24 14:23) [12]

Reindeer Moss Eater (24.01.03 14:15)

Это немного не к тому.

function TMemoStrings.GetTextStr: string;
begin
Result := Memo.Text;
end;

И нету там #13#10...

---

← →
Reindeer Moss Eater   (2003-01-24 14:27) [13]

Ну я к тому, что может ему только казалось, что #13#10 там были.
(Типа жал ведь "Enter")

---

← →
Anatoly Podgoretsky ©   (2003-01-24 14:30) [14]

Нифига

mate © (24.01.03 14:03)
var s : string; s := form1.memo1.lines.text;
Там они есть.

Если казалось то здесь.

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.011 c