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

Вниз

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

 
Dark ©   (2008-03-13 20:31) [0]

ПОдскажите пожалуйста функцию, которая считывает несколько символов из переменной типа string и другую, которая подсчитывает их кол-во. Ну например есть:

const
name="abcdef";
var
tmp:string;
begin
tmp:=Функция(name, 2,4) //ПО идее должно считать сиволы со 2го по 4ый.
end

и переменная tmp получает значение "bc" или "cd", это зависит от того, как считывает.

Ну и подсчитывание символов:

const
tmp="sfhjg";
var
i:integer;
begin
i:=фунция(tmp);
end
И переменная i принимает значение 5.

Вобщем как можно такое реализовать???


 
{RASkov} ©   (2008-03-13 20:40) [1]

А ведь где-то есть в хэлпе про Copy() и Length() ;)


 
NieL   (2008-03-13 20:41) [2]


> ПОдскажите пожалуйста функцию, которая считывает несколько
> символов из переменной типа string и другую, которая подсчитывает
> их кол-во. Ну например есть:
>
> const
> name="abcdef";
> var
> tmp:string;
> begin
> tmp:=Функция(name, 2,4) //ПО идее должно считать сиволы
> со 2го по 4ый.
> end
>
> и переменная tmp получает значение "bc" или "cd", это зависит
> от того, как считывает.
>
Copy(строка, позиция, длина);
> Ну и подсчитывание символов:
>
> const
> tmp="sfhjg";
> var
> i:integer;
> begin
> i:=фунция(tmp);
> end
> И переменная i принимает значение 5.
>
> Вобщем как можно такое реализовать???
> <Цитат


> Ну и подсчитывание символов:
>
> const
> tmp="sfhjg";
> var
> i:integer;
> begin
> i:=фунция(tmp);
> end
> И переменная i принимает значение 5.
>
> Вобщем как можно такое реализовать???
> <Ц

Length(строка): Integer; Length(tmp)


 
Efir   (2008-03-13 20:43) [3]

Такой функцией является Copy.
tmp:=Copy(name, 2, 4);
i:=Length(tmp);


 
Dark ©   (2008-03-13 21:02) [4]

Спасибо огромное! Ещё вопросик: есть ф-ция FileSearch(string), она ищет 1 файл. А как сделать, чтобы она..ну хотя бы составляла список найденных файлов? Как поиск в виндоузе. а список можно в мемо пихать


 
Efir   (2008-03-13 21:12) [5]

В этом помогут функции:
FindFirst
FindNext
FindEnd


 
nstur   (2008-03-13 21:18) [6]

Осмелюсь предложить готовый компонент
http://www.nstur.narod.ru/Delphi/NsComponent/NsFindFile.html

Там описания. Есть исходники.


 
ЦУП ©   (2008-03-13 21:24) [7]

http://www.delphimaster.ru/cgi-bin/forum.pl?n=18&search=FindClose


 
Dark ©   (2008-03-14 19:51) [8]

Ещё вопрос появился: считываю из файла значения. Мне нужно считывать от запятой до запятой. В строке несколько запятых. Как можно такое реализовать? Считывать посимвольно..считывать строку, а потом копировать из неё..вобщем помогите!


 
{RASkov} ©   (2008-03-14 20:33) [9]

> [8] Dark ©   (14.03.08 19:51)

поищи здесь вокруг себя на форуме ветку про "выдергивание слов" или что-то в этом роде, вот прямо на днях была... там и тебе ответ наверняка есть...
Можешь поиск по WordCount, ExtractWord или WordDelims - это ключевые слова...


 
Dark ©   (2008-03-14 21:05) [10]

Ненашел...


 
{RASkov} ©   (2008-03-14 21:14) [11]

> [10] Dark ©   (14.03.08 21:05)

Ну что врешь-то? И не искал ведь :(
http://delphimaster.net/view/2-1204965397/

> Как можно такое реализовать?

примерно так
читаешь текстовый файл пока не кончится: F: TextFile, while, not EOF, do
ну и по ходу чтения, т.е. после do - разбирай строку при помощи функций, названия которых в [9] или по ссылки приведенной здесь, в свою очередь находящихся в RxLib например.



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

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

Наверх





Память: 0.5 MB
Время: 0.007 c
2-1205447785
Германн
2008-03-14 01:36
2008.04.13
Вопрос про TADODataset.ParamCheck


4-1186469502
kotbazilio
2007-08-07 10:51
2008.04.13
Active Desktop


2-1206042597
Studios
2008-03-20 22:49
2008.04.13
httpcli1 как загрузить jpeg ?


2-1205927025
Deled
2008-03-19 14:43
2008.04.13
Программный анализатор


2-1205862569
Tovarisch
2008-03-18 20:49
2008.04.13
Не пишет первое слово





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