|
#1
|
|||
|
|||
AnsiPos
Задача выборка из мемо .
решил начать с самого простого . с выборки со строки , как написано в документации и не работает а точнее скорее не правильно обращаюсь , с function Код:
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} function AnsiPos ( const Substr, S: string ): Integer; procedure TForm1.Button1Click(Sender: TObject); var Substr, S: string; I: Integer; begin S:= 'Исходная строка'; Substr:= 'ход'; I:= AnsiPos(Substr, S); // I:= 3 end; end. Последний раз редактировалось u.s.fire, 01.10.2017 в 21:38. |
#2
|
|||
|
|||
Дык что не работает? Вроде все нормально (если принять значение, указанное в комментарии за реальное значение I после вызова). Только убери 'function', оно используется для создания новых функций.
А вообще, напиши что хотел то сделать... а то по этому наброску непонятно... |
#3
|
|||
|
|||
Цитата:
lmikle рад слышать , в этом глухом интернете , задача ,отпарсить поля мемо , выбрать определенные значения ,без мусора например , такой текст , но будет более важный , примерно 1000 строк мемо выбрать : понедельник , вторник , среда определенным алгоритмом , из мемо , во второе мемо , с применением динамического масива Код:
вчера : понедельник число 1.01.1991 завтра : вторник число 2.01.1991 послезавтра : среда число 03.01.1991 |
#4
|
|||
|
|||
заработало
спс lmikle , далее , пристраиватся , к мемо , Последний раз редактировалось u.s.fire, 01.10.2017 в 22:01. |