Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.02.03;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

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

Наверх





Память: 0.47 MB
Время: 0.011 c
3-4730
Ops
2003-01-14 16:08
2003.02.03
SQL запрос. Сумма по 2 таблицам. Уже 2 часа думаю


1-4883
Ivan_73
2003-01-24 09:04
2003.02.03
Закрытие формы


4-5350
anod
2002-12-13 14:46
2003.02.03
Kak videlit stroku v Listbox


14-5250
???
2003-01-16 16:07
2003.02.03
String


14-5260
iNew
2003-01-17 06:05
2003.02.03
Как в Fare посмотреть размер файла?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский