-
Stepper (29.03.08 19:29) [0]Вот кусочек кода:
...
var
get: string;
src: ??? // Тип переменной
begin
get := gethttp.Get('_http://www.url_1/') + gethttp.Get('_http://www.url_2/');
src(get); // Сохраняем в спец тип
// Тут что то делаем с полученными данными
// Тут сохраняем в текстовый фаил
end;
... -
Сергей М. © (29.03.08 19:34) [1]
> спец тип
Чем "спец тип" должен отличаться от строкового типа ?
И зачем все это затеяно ?
> что то делаем с полученными данными
Зачем для этого понадобился како-йто там "спец тип" ? -
Stepper (29.03.08 19:59) [2]
> Сергей М. © (29.03.08 19:34) [1]
> > спец тип
Для того что бы сохранить полученные данные использую Мемо:
...
Memo.Lines.Add(get);
Memo.Lines.SaveToFile('MyFile' + '.txt');
...
> > что то делаем с полученными данными
Как мне сохранить пропарсенные данные в текстовый фаил, чтоб не использовать для сохранения Мемо? (Что само собой корявое решение) -
Сергей М. © (29.03.08 20:01) [3]Используй TStringList
-
<code> (29.03.08 20:02) [4]Сохранение строковой переменной в файл:
procedure TForm1.FormCreate(Sender: TObject);
var s:String; FS:TFileStream;
begin
s:='{00000002-0000-0000-C000-000000000046}';
FS:=TFileStream.Create('out.txt',fmCreate or fmOpenWrite);
FS.Write(Pointer(S)^,Length(S));
FS.Free;
end; -
> Stepper
Кстати, в ответе сервера необязательно может быть текст. Там могут быть и бинарные данные. Memo и TStringList в этом случае вообще отпадают.