Delphi Studio » Примеры на Delphi » Примеры на Delphi Система » Функции для работы со строками в Delphi + примеры

    "Уважаемые посетители, если вы хотите задать вопросы и получить ответы, то регистрируйтесь и добавляйте свои вопросы тут: " Задать вопрос.
      Delphi Studio Функции для работы со строками в Delphi + примеры

      Функции для работы со строками в Delphi + примеры

      Функции для работы со строками в Delphi + примеры (Pos, Copy, ReverseString, Insert, Delete, SetLength, IntToStr, StrToInt, FloatToStr, StrToFloat, DateToStr, TimeToStr, StrToDate, StrToTime, LowerCase, UpperCase, Trim, TrimLeft, TrimRight)

      Функция Pos возвращает позицию подстроки в строке. Нумерация символов начинается с единицы (1). В случае отсутствия подстроки в строке возращается 0
      Pos(SubStr, Str: String)
      пример функции Pos №1
      var
      Str1, Str2: String;
      P: Integer;
      begin
      Str1:='Delphi Studio';
      Str2:='St';
      P:=Pos(Str2, Str1);
      ShowMessage(IntToStr(P)); // результат: 8

      пример функции Pos №2
      var
      Str1, Str2: String;
      P: Integer;
      begin
      Str1 := 'Я люблю сайт Delphi Studio';
      Str2 := 'сайт Delphi';
      P := Pos(Str2, Str1);
      if P>0 then
      ShowMessage('В строке: '+Str1+', присутствует текст: '+Str2)
      else
      ShowMessage('В строке: '+Str1+', отсутствует текст: '+Str2);
      end;


      Функция Copy возвращает часть строки Str, начиная с символа Start длиной Length. Ограничений на Length нет - если оно превышает количество символов от Start до конца строки, то строка будет скопирована до конца
      Copy(Str: String; Start, Length: Integer)
      пример функции Copy
      var
      Str1, Str2: String;
      begin
      Str1:='Delphi Studio';
      Str2:=Copy(Str1, 1, 10);
      ShowMessage(Str2); // результат: Delphi Stu


      Функция ReverseString инвертируют строку, т.е. располагают её символы в обратном порядке
      ReverseString(Str: String)
      пример функции ReverseString
      uses StrUtils;

      var
      Str: String;
      begin
      Str := 'Delphi Studio';
      Str := ReverseString(Str);
      ShowMessage(Str); // результат: oidutS ihpleD


      Функция Insert вставляет одну строку в другую, начиная с указанного символа
      Insert(SubStr: String; Str: String; Pos: Integer)
      пример функции Insert
      var
      Str1, Str2: String;
      begin
      Str1 := 'Я Delphi Studio';
      Str2 := 'люблю сайт ';
      Insert(Str2, Str1, 3);
      ShowMessage(Str1); // результат: Я люблю сайт Delphi Studio
      end;


      Функция Delete удаляет кусок текста из указаной строки
      Delete(Str: String; Start, Length: Integer)
      пример функции Delete
      var
      Str: String;
      begin
      Str := 'Delphi Studio сайт';
      Delete(Str, 8, 6);
      ShowMessage(Str); // результат: Delphi сайт


      Функция SetLength позволяет изменить длину строки. Если строка содержала большее количество символов, чем задано в функции, то "лишние" символы обрезаются
      SetLength(Str: String; NewLength: Integer)
      пример функции SetLength
      var
      str: String;
      begin
      str:='Delphi Studio';
      SetLength(str, 6);
      ShowMessage(str); результат: Delphi


      Функция IntToStr для преобразования значения целочисленного выражения Value в строку
      IntToStr(Value: Integer): string
      пример функции IntToStr
      procedure TForm1.FormCreate(Sender: TObject);
      var
      int : integer;
      begin
      int := 2010;
      ShowMessage(IntToStr(int));
      end;


      Функция StrToInt для преобразования строки в целое число
      StrToInt(const str: string): integer
      пример функции StrToInt
      procedure TForm1.FormCreate(Sender: TObject);
      var
      int : integer;
      begin
      int := StrToInt('2010');
      ShowMessage(IntToStr(int));
      end;


      Функция FloatToStr для преобразования значения вещественного выражения Value в строку
      FloatToStr(Value: Extendet): string
      пример функции FloatToStr
      var
      str: string;
      L: integer;
      begin
      str:='Delphi';
      L:=Length(str);
      ShowMessage(FloatToStr(L)); // результат: 6


      Функция StrToFloat для преобразования строки в вещественное число
      StrToFloat(const str: string) Extended
      пример функции StrToFloat
      procedure TForm1.FormCreate(Sender: TObject);
      var
      str : string;
      ext : Extended;
      begin
      str := '2010';
      ext := StrToFloat(str);
      ShowMessage(FloatToStr(ext));
      end;


      Функция DateToStr для преобразования значения даты в выражении Date в строку
      DateToStr(Date: TDateTime): string
      пример функции DateToStr
      procedure TForm1.FormCreate(Sender: TObject);
      var
      myDate : TDateTime;
      begin
      myDate := StrToDate('15.04.2010');
      ShowMessage(DateToStr(myDate));
      end;


      Функция TimeToStr для преобразования значения времени Time в строку
      TimeToStr(time: TDateTime): string
      пример функции TimeToStr
      procedure TForm1.FormCreate(Sender: TObject);
      var
      myTime : TDateTime;
      begin
      myTime := StrToTime('10:48:06');
      ShowMessage(TimeToStr(myTime));
      end;


      Функция StrToDate для преобразования строки в дату
      StrToDate(const str: string): TDateTime
      пример функции StrToDate
      procedure TForm1.FormCreate(Sender: TObject);
      var
      myDate : TDateTime;
      begin
      myDate := StrToDate('15.04.2010');
      ShowMessage(DateTimeToStr(myDate));
      end;


      Функция StrToTime для преобразования строки во время
      StrToTime(const str: string): TDateTime
      пример функции StrToTime
      procedure TForm1.FormCreate(Sender: TObject);
      var
      myTime : TDateTime;
      begin
      myTime := StrToTime('18');
      ShowMessage(TimeToStr(myTime));
      end;


      Функция LowerCase преобразует символы в нижний регистр
      LowerCase(const str: string): string
      пример функции LowerCase
      procedure TForm1.Button1Click(Sender: TObject);
      var
      str : string;
      begin
      str := Edit1.Text;
      Edit1.Text := LowerCase(str);
      end;


      Функция UpperCase преобразует символы в верхний регистр
      UpperCase(const str: string): string
      пример функции UpperCase
      procedure TForm1.Button1Click(Sender: TObject);
      var
      str : string;
      begin
      str := Edit1.Text;
      Edit1.Text := UpperCase(str);
      end;


      Функция Trim удаляет пробелы из начала и конца строки
      Trim(const str: string): string
      пример функции Trim
      procedure TForm1.Button1Click(Sender: TObject);
      var
      str : string;
      begin
      str := Edit1.Text;
      Edit1.Text := Trim(str);
      end;


      Функция TrimLeft удаляет пробелы из начала строки
      TrimLeft(const str: string): string
      пример функции TrimLeft
      procedure TForm1.Button1Click(Sender: TObject);
      var
      str : string;
      begin
      str := Edit1.Text;
      Edit1.Text := TrimLeft(str);
      end;


      Функция TrimRight удаляет пробелы из конца строки
      TrimRight(const str: string): string
      пример функции TrimRight
      procedure TForm1.Button1Click(Sender: TObject);
      var
      str : string;
      begin
      str := Edit1.Text;
      Edit1.Text := TrimRight(str);
      end;

        Информация
        Информация

          Посетители, находящиеся в группе Гости, не могут оставлять комментарии в данной новости.

            Лучшее на Delphi Studio

            Лучшие книги по Delphi

            • Книга Delphi 2010 Handbook with Source Code
              Книга Delphi 2010 Handbook with Source Code - Книга Delphi 2010 Handbook with Source Code посвящена CodeGear Delphi 2010
            • Книга Программирование в Delphi глазами хакера. Фленов
              Книга Программирование в Delphi глазами хакера. Фленов - В книге вы найдете множество нестандартных приемов программирования на языке Delphi, его недокументированные функции и возможности. Вы узнаете, как создавать маленькие шуточные программы. Большая часть книги посвящена программированию сетей
            • Книга Delphi в шутку и всерьез что умеют хакеры М.Флёнов
              Книга Delphi в шутку и всерьез что умеют хакеры М.Флёнов - Электронная книга о профессиональных приемах программирования в Delphi. В легкой и доступной форме с использованием большого количества профессиональных примеров рассмотрены вопросы корректного написания кода, оптимизации программ, работы с системным окружением, создания сетевых приложений
            • Книга Библия Delphi Михаил Фленов (2-е издание) + CD
              Книга Библия Delphi Михаил Фленов (2-е издание) + CD - Книга посвящена программированию на языке Delphi от самых основ до примеров построения конкретных приложений. Подробно описывается логика выполнения каждого участка кода, чтобы читатель смог использовать эти знания при решении собственных задач. Книга содержит большое количество примеров практического программирования
            • Книга О чем не пишут в книгах по Delphi + CD Григорьев А.Б
              Книга О чем не пишут в книгах по Delphi + CD Григорьев А.Б - Рассмотрены малоосвещенные вопросы программирования в Delphi. Описаны методы интеграции VCL и API. Показаны внутренние механизмы VCL и приведены примеры вмешательства в эти механизмы. Рассмотрено использование сокетов в Delphi: различные режимы их работы, особенности для протоколов TCP и UDP
            • Книга Delphi 7 Учебный курс С.Бобровский
              Книга Delphi 7 Учебный курс С.Бобровский - Электронная книга является руководством по программированию в среде Delplii 7. Описывается весь процесс разработки программы: от конструирования диалогового окна до организации справочной системы и создания установочного CD-ROM
            • Книга Delphi Быстрый Старт
              Книга Delphi Быстрый Старт - В книге описываются интерфейс системы визуального программирования Delphi на основе 6-й версии, состав и характеристика элементов проекта приложения, приемы программирования на языке Object Pascal
            • Книга Indy in Depth. Глубины Indy
              Книга Indy in Depth. Глубины Indy - Книга Indy in Depth Глубины Indy будет интересно для тех, кто интересуется хакингом, вирусописанием, а значит и для тех, кто занимается защитой сетей, программ, информации. Эта книга не только по Indy, она про Интернет, про протоколы, термины, методы работы, а к Indy относятся только примеры
            • Книга OpenGL - Графика в проектах Delphi + CD. М.В.Краснов
              Книга OpenGL - Графика в проектах Delphi + CD. М.В.Краснов - Книга посвящена использованию стандартной графической библиотеки OpenGL в проектах Delphi. Начиная с самой минимальной программы, последовательно и подробно рассматриваются все основные принципы программирования компьютерной графики: двухмерные итрехмерные построения, анимация, работа с текстурой, визуальные эффекты
            • Книга Delphi 7 для профессионалов. Марко Кэнту
              Книга Delphi 7 для профессионалов. Марко Кэнту - Книга, которую должен прочитать каждый, кто хочет стать профессиональным программистом на Delphi. Книга не предназначена для начинающих. Требуются хорошие знания Delphi. Предназначена для тех, кто хочет стать именно профессиональным программистом


            Поиск на Delphi Studio




            На Delphi Studio нашли

            использование переменных в формах делфи использование переменных в формах делфи
            исходник генератора паролей исходник генератора паролей
            исходники для delphi 2010 исходники для delphi 2010
            CppWebBrowser1->ExecWB RAD Studio CppWebBrowser1->ExecWB RAD Studio
            Фленов Библия Делфи Фленов Библия Делфи
            Примеры задач на Delphi 7 Примеры задач на Delphi 7
            Как создать на фтп папку Как создать на фтп папку
            самоучитель по делфи самоучитель по делфи
            delphi checkbox программно нажать delphi checkbox программно нажать
            tidftp delphi описание tidftp delphi описание
             открыть Delphi 7 открыть Delphi 7
            delphi memo выделить строку delphi memo выделить строку
            база данных исходники база данных исходники
            как сделать borland pascal как сделать borland pascal
            ClientSocket проверка соединения delphi ClientSocket проверка соединения delphi
            сборник исходников задач на delphi сборник исходников задач на delphi
            книги по delphi 2010 скачать книги по delphi 2010 скачать
            Кенту Delphi 2005 скачать професионалов Кенту Delphi 2005 скачать професионалов
            программирование udp сокета в delphi программирование udp сокета в delphi
            как задать размер строки в делфи как задать размер строки в делфи
            AlphaBlend +Delphi AlphaBlend +Delphi
            программа начинающего на delphi скачать программа начинающего на delphi скачать
            примеры решения задач на делфи примеры решения задач на делфи
            сокеты udp в delphi сокеты udp в delphi
            разделить число на составляющие delphi разделить число на составляющие delphi
            delphi пример showmessage delphi пример showmessage
            курсовые на делфи бесплатно курсовые на делфи бесплатно
            как в дельфи создать калькулятор как в дельфи создать калькулятор
            delphi компонент отправка email delphi компонент отправка email
            скачать калькулятор дельфи скачать калькулятор дельфи
            delphi 7 свернуть окно трей
delphi 7 свернуть окно трей
            вертикальная прокрутка форма delphi
вертикальная прокрутка форма delphi
            Delphi иконка Edit
Delphi иконка Edit
            компоненты Socket на Delphi 7
компоненты Socket на Delphi 7
            delphi исходники скачать
delphi исходники скачать
            delphi удалить изображения WebBrowser
delphi удалить изображения WebBrowser
            пример webbrowser на Indy
пример webbrowser на Indy


            Информация

            Сайт Delphi Studio рассчитан для начинающих, новичков, чайников, которые решили программировать на Delphi :)
            Добавляйте свои примеры, исходники, компоненты, статьи и тогда на сайте будет много полезной информации, что поможет друг другу находить нужный материал.


            Случайные новости

            Книга OpenGL - Графика в проектах Delphi + CD. М.В.Краснов
            Книга OpenGL - Графика в проектах Delphi + CD. М.В.Краснов - Книга посвящена использованию стандартной графической библиотеки OpenGL в проектах Delphi. Начиная с самой минимальной программы, последовательно и подробно рассматриваются все основные принципы программирования компьютерной графики: двухмерные итрехмерные построения, анимация, работа с текстурой, визуальные эффекты
            Книга Delphi в шутку и всерьез что умеют хакеры М.Флёнов
            Книга Delphi в шутку и всерьез что умеют хакеры М.Флёнов - Электронная книга о профессиональных приемах программирования в Delphi. В легкой и доступной форме с использованием большого количества профессиональных примеров рассмотрены вопросы корректного написания кода, оптимизации программ, работы с системным окружением, создания сетевых приложений
            Как загрузить в Memo текст из внешнего файла Пример на Delphi
            Как загрузить в Memo текст из внешнего файла Пример на Delphi - Пример на Delphi показывающий как можно загрузить в Memo текст из внешнего файла


            Опрос

            Что вы хотите больше на Delphi Studio?
            Исходники
            Книги, Учебники
            Компоненты
            Статьи
            Примеры


            Лучшее на Delphi Studio


            Информация

            А знаете ли вы что такие известные программы как AIMP, Skype, QIP, QIP Infium, R&Q, The Bat!, FL Studio, Guitar Pro, Game Maker, Total Commander, PowerArchiver, Download Master написаны на Delphi? И это далеко не весь список программ чем может похвастаться продукция Borland Delphi!


            rss