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

Вниз

множества и строки   Найти похожие ветки 

 
Dwan ©   (2005-02-24 20:09) [0]

Кто-нибудь знает как перевести одну букву строкового типа в множество?


 
begin...end ©   (2005-02-24 20:11) [1]

> Dwan ©   (24.02.05 20:09)

Букв строкового типа не бывает. Можно создать множество, состоящее из одной буквы. Например:

var
 MySet: set of Char;
begin
 MySet := ["A"]
end.


 
Dwan ©   (2005-02-24 20:22) [2]

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


 
Palladin ©   (2005-02-24 20:28) [3]

С какой целью?


 
begin...end ©   (2005-02-24 20:28) [4]

> Dwan ©   (24.02.05 20:22) [2]

var
 S: String;          // строка из одной буквы
 MySet: set of Char; // множество
begin
 MySet := [S[1]]
end.


Это нужно? Или нет?


 
Юрий Зотов ©   (2005-02-24 20:29) [5]

var
 Str: string;
 CharSet: set of Char;
...
 CharSet := [Str[1]];


 
Dwan ©   (2005-02-24 20:35) [6]

Благодарю всех за помощь



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

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

Наверх





Память: 0.45 MB
Время: 0.034 c
1-1109571508
Chaos_BUG
2005-02-28 09:18
2005.03.13
Исходники EncryptPE. Помогите с компиляцией.


8-1101346399
Ego
2004-11-25 04:33
2005.03.13
Анимированный рисунок


4-1107128420
Intelect
2005-01-31 02:40
2005.03.13
Как программно загрузить драйвер в память! SYS!


1-1109359877
Kiad
2005-02-25 22:31
2005.03.13
MDI


1-1109694502
mic_2000
2005-03-01 19:28
2005.03.13
Как в событии FormCreate главной формы можно завершить приложение





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