![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 25.12.2006
Сообщений: 15
|
![]()
Здравствуйте!
Есть файл по адресу http://dimkinstd.jino-net.ru/text.txt На форме есть кнопка, активирующая процедуру ситчывания и Edit1 куда будет вписана эта строка после считывания. Нужно считать из него вторую строку. |
![]() |
![]() |
![]() |
#2 |
Кодер
Форумчанин
Регистрация: 27.01.2007
Сообщений: 271
|
![]()
Вот тебе функция
function ProcEdit(fname:string):string; var M:TStrings; begin M:=TSrtingList.Create; M.LoadFromFile(fname); result:=M.Strings[1]; M.Free; end; Результатом будет вторая строка в файле |
![]() |
![]() |
![]() |
#3 |
Кодер
Форумчанин
Регистрация: 27.01.2007
Сообщений: 271
|
![]()
Да забыл а чтобы зугрзить этот файл с сети используй ClientSocket где в качестве хоста используй твой адрес
|
![]() |
![]() |
![]() |
#4 |
Пользователь
Регистрация: 25.12.2006
Сообщений: 15
|
![]() |
![]() |
![]() |
![]() |
#5 |
Кодер
Форумчанин
Регистрация: 27.01.2007
Сообщений: 271
|
![]()
Код написать не могу нет времени. Советую воспользоваться для начала Indy(Вкладка IndyClient).
|
![]() |
![]() |
![]() |
Опции темы | Поиск в этой теме |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Считать строку | XATAB | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 10 | 10.04.2008 21:18 |
считать елементы файла в массив | XfighT | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 2 | 14.01.2008 16:35 |
кусок кода считать не из тестового файла а из Tmemo | Stanislav | Общие вопросы Delphi | 8 | 07.01.2008 22:12 |
Вывести конкретную строку из файла | Captain Nemo | Общие вопросы Delphi | 9 | 15.05.2007 03:44 |
как считать данные с Txt файла? | Alar | Общие вопросы Delphi | 0 | 29.10.2006 20:12 |