Вниз
Скачать: CL | DM;

В чем лучше сохранять строковую переменную?   Найти похожие ветки 

← →
Stepper   (2008-03-29 19:29) [0]

Вот кусочек кода:

...
var
get: string;
src: ??? // Тип переменной
begin
get := gethttp.Get("_http://www.url_1/") + gethttp.Get("_http://www.url_2/");
src(get); // Сохраняем в спец тип
// Тут что то делаем с полученными данными
// Тут сохраняем в текстовый фаил
end;
...


← →
Сергей М. ©   (2008-03-29 19:34) [1]


> спец тип


Чем "спец тип" должен отличаться от строкового типа ?
И зачем все это затеяно ?


> что то делаем с полученными данными


Зачем для этого понадобился како-йто там "спец тип" ?


← →
Stepper   (2008-03-29 19:59) [2]


> Сергей М. ©   (29.03.08 19:34) [1]
> > спец тип


Для того что бы сохранить полученные данные использую Мемо:


...
Memo.Lines.Add(get);
Memo.Lines.SaveToFile("MyFile" + ".txt");
...



> > что то делаем с полученными данными


Как мне сохранить пропарсенные данные в текстовый фаил, чтоб не использовать для сохранения Мемо? (Что само собой корявое решение)


← →
Сергей М. ©   (2008-03-29 20:01) [3]

Используй TStringList


← →
<code>   (2008-03-29 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;


← →
DVM ©   (2008-03-29 20:04) [5]


> Stepper  

Кстати, в ответе сервера необязательно может быть текст. Там могут быть и бинарные данные. Memo и TStringList в этом случае вообще отпадают.


← →
Stepper   (2008-03-29 20:17) [6]


> Сергей М. ©   (29.03.08 20:01) [3]


>   (29.03.08 20:02) [4]


> DVM ©   (29.03.08 20:04) [5]


Спасибо Огромное! Сие мне и нужно было!



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
2-1207032358
cvg
2008-04-01 10:45
2008.04.27
Как перевести время из секунд с начала дня в формат TDateTime?


15-1205352276
md10
2008-03-12 23:04
2008.04.27
Регистрация собственного Исервера


15-1205350043
Interfer0n
2008-03-12 22:27
2008.04.27
Ищем программистов Delphi, C++/Visual Studio


2-1206990412
anton
2008-03-31 23:06
2008.04.27
проверка орфографии


15-1205646648
Гость
2008-03-16 08:50
2008.04.27
как отредактировть .res?




   Наверх