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

Вниз

Очень маленький и глупый вопрос   Найти похожие ветки 

 
msoftware   (2003-02-18 11:17) [0]

Как например в Edit1 узнать третью букву????


 
alxx   (2003-02-18 11:18) [1]

If Length(Edit1.Text)>2 Then c:=Edit1.Text[3];


 
Романов Р.В.   (2003-02-18 11:23) [2]

Это не ты на прошлой неделе спрашивал как узнать вторую букву, а на позапрошлой как узнать первую? Сколько еще букв в твоем Edit?


 
alxx   (2003-02-18 11:26) [3]

Третья буква в "Edit1" = "i"


 
Chubais   (2003-02-18 11:28) [4]


> Романов Р.В. © (18.02.03 11:23)

точна!


 
xyz   (2003-02-18 12:05) [5]

ShowMessage(Edit1.text[3]);


 
-=Sergeante=-   (2003-02-18 13:18) [6]

TGetChar=class(TObject)
private
FText: String;
published
function GetChar:String; virtual;
public
constructor Create(Value: String);
property Char: string read GetChar;
end;

TGetChar3=class(TGetChar)
public
function GetChar: string; override;
end;

implementation

constructor TGetChar.Create(Value: String);
begin
FText:=Value;
end;

function TGetChar.GetChar: String;
begin
//
end;

{ TGetChar3 }

function TGetChar3.GetChar: string;
begin
result := FText[3];
end;

end.


 
Palladin   (2003-02-18 13:38) [7]


> -=Sergeante=- © (18.02.03 13:18)

а где поддержка COM+,ActiveX и иже с ними!!???


 
Юров Владимир   (2003-02-18 13:40) [8]


> Palladin © (18.02.03 13:38)

Вроде достаточно. Просто, компактно и наглядно :)



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

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

Наверх





Память: 0.56 MB
Время: 0.044 c
14-17262
happyboy
2003-02-18 16:23
2003.03.06
DrawItem


6-17224
Spartak
2003-01-15 14:22
2003.03.06
Привет мастера. как вам


3-16954
RusIv
2003-02-17 11:00
2003.03.06
Выборку SQL-запроса передать в ComboBox, в строки Item ов


9-16846
Dark[UA]
2002-10-01 07:54
2003.03.06
GLScene


8-17202
Митяй2
2002-11-07 09:48
2003.03.06
ANI-курсоры





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