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

Вниз

Как перевисти текст из поля Memo в обычную строку?   Найти похожие ветки 

 
Developerr   (2003-11-20 11:42) [0]

Подскажите, пожалуйста, как сделать, чтобы из поля Memo можно было выводить текст в F1Book (Formula One). Я пробовал так:
F1Book.TextRC[1,1]:=Table1["Name"];
где поле Name типа Memo.
В результате получается ерунда. Текст выводится в нечитабельном виде. Знаки, название шрифта и т.д.
Пробовал и через ShowMessage. А именно
ShowMessage(Table1["Name"]); или так ShowMessage(Table1.FieldByName("Name").AsString);
То же самое.
Я так понимаю, что в поле Memo текст находится в каком-то своем формате. А вот как из этого формата можно перевести в обычный текст?

Спасибо.


 
Developerr   (2003-11-20 13:13) [1]

Никто не знает, как перевести или просто лень отвечать???


 
Reindeer Moss Eater   (2003-11-20 13:16) [2]

ЭкземплярПоля.AsString


 
Developerr   (2003-11-20 13:23) [3]

Так?
Table1.FieldByName("Name").AsString

Если да, то так не толучается.
Выдается такой текст:

{\rtf1\ansi\ansicpg1251\deff0\deflang1049{\fonttbl{\f0\fnil MS Sans Serif;}}
\viewkind4\uc1\pard\f0\fs16\par
}
Спасибо.


 
Reindeer Moss Eater   (2003-11-20 13:24) [4]

И что именно не получается?


 
Zacho   (2003-11-20 13:29) [5]


> Developerr © (20.11.03 13:23) [3]

А зачем в Формулу 1 пихать rtf ? Это же не Word.


 
Developerr   (2003-11-20 13:46) [6]


> Reindeer Moss Eater ©

Я спросил как это писать

> ЭкземплярПоля.AsString


> Так?
> Table1.FieldByName("Name").AsString
>
> Если да, то так не толучается.
> Выдается такой текст:
>
> {\rtf1\ansi\ansicpg1251\deff0\deflang1049{\fonttbl{\f0\fnil
> MS Sans Serif;}}
> \viewkind4\uc1\pard\f0\fs16\par
> }


> Zacho ©


> А зачем в Формулу 1 пихать rtf ? Это же не Word.

Я делаю штатное рассписание. И так сложилось, что у нас в отделе кадров сидят люди без мозгов и отделы поназывали так, что одно из названий получилось = 460 символов. Вот я и парюсь с этим названием.
А выводить штатное рассписание очень удобно в Formula One.

Такие дела.


 
Zacho   (2003-11-20 13:48) [7]


> Developerr © (20.11.03 13:46) [6]

И все-таки, какое отношение имеет rtf к F1 ? Ну работает F1 с rtf и все тут. Выводи в TRichEdit или в ворде. Или храни эти строки в обычном тексте, а не в rtf.


 
Reindeer Moss Eater   (2003-11-20 14:01) [8]

> Если да, то так не толучается.
> Выдается такой текст:
>
> {\rtf1\ansi\ansicpg1251\deff0\deflang1049{\fonttbl{\f0\fnil
> MS Sans Serif;}}
> \viewkind4\uc1\pard\f0\fs16\par
> }

ну блеск!
а что по твоему должно выдавать?


 
Developerr   (2003-11-20 14:04) [9]

Да зачем мне в ворде? У меня в штатном рассписании все работники разбиты по отделам и перед каждым отделом пишется его название. Когда были маленькие названия я вообще не пользовался Memo.
Короче, мне нужно перевести в обычный текст и все.


 
Zacho   (2003-11-20 14:09) [10]


> Developerr © (20.11.03 14:04) [9]

А зачем название отдела в rtf ? Чем plain text не устраивает ?

> Короче, мне нужно перевести в обычный текст и все.

Это правильно. И пусть оно будет хоть 460 символов, хоть еще больше ...


 
Developerr   (2003-11-20 15:34) [11]

Понял, спасибо. В этом и была проблема.



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

Форум: "Базы";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.009 c
1-36620
qwe
2003-11-21 16:53
2003.12.12
Invalid Class Typecast


1-36671
Паша_Кимры
2003-11-30 13:37
2003.12.12
Технология СОМ


3-36571
Russko
2003-11-20 13:02
2003.12.12
SQL


7-36880
Dimaxx
2003-09-30 00:53
2003.12.12
Про печать графики на принтере...


7-36862
RS19
2003-10-05 18:23
2003.12.12
Нестандартная работа с LPT





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский