Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.18;
Скачать: CL | DM;

Вниз

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

 
MiCOLA   (2004-04-02 18:18) [0]

У меня проблема, не могу создать тип элиментами которого являются строки:
type
  TX=("odin","dva","tri");
помогите, если кто знает как, решить эту проблему.
Буду очень рад любому совету.


 
Digitman ©   (2004-04-02 18:37) [1]

массивы-то чем не устраивают ?


 
Gero ©   (2004-04-02 19:04) [2]

type
 TX=(odin,dva,tri);

По-другому нельзя.


 
P.N.P. ©   (2004-04-02 19:15) [3]


> По-другому нельзя.

Можно :)
type TMySet= record
odin:string;
dva:string;
tri:string;
end;

var
 Form1: TForm1;
 MySet:TMySet=(odin:"1";dva:"2";tri:"3");


 
Тимохов ©   (2004-04-02 19:16) [4]


> P.N.P. ©   (02.04.04 19:15) [3]


это прямо таки тоже самое...


 
PVOzerski ©   (2004-04-02 19:24) [5]

У меня последних версий Delphi нет под рукой, так что проверить идею не могу. Если enum"ы с указанным значением там поддерживаются в диапазоне longint, а длина строк не превышает 4 символов, можно представить эти строки (вернее, массивы байт) как longint"ы (AKA integer"ы) и выдать нечто вроде
TX=(odin=..., dva=... , tri=...), где вместо многоточий надо вставить правильные константы. Получится оптимизация ценностью в 2 копейки при неудобочитаемом коде. Уж лучше использовать
type
TX=(odin,dva,tri);
const
X:array[TX]of string=("Odin","Dva","Tri");


 
PVOzerski ©   (2004-04-02 19:24) [6]

Удалено модератором
Примечание: дубль



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

Текущий архив: 2004.04.18;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.032 c
14-1080387059
Thor
2004-03-27 14:30
2004.04.18
.NET CF


3-1079947979
Анонимщик
2004-03-22 12:32
2004.04.18
Delphi6, Interbase


7-1076160566
-=DeMoH=-
2004-02-07 16:29
2004.04.18
Как работать с LPT под любой WIN?


14-1079906051
konstantinov
2004-03-22 00:54
2004.04.18
Посмотрите код. Не слишко ли коряво?


1-1080713994
DimonNew
2004-03-31 10:19
2004.04.18
HTML средствами Delphi





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