Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2007.07.29;
Скачать: [xml.tar.bz2];

Вниз

Можно ли в поток добавить данные?   Найти похожие ветки 

 
sergeyst ©   (2007-06-26 13:28) [0]

Сабж.


 
Джо ©   (2007-06-26 13:29) [1]

Можно. И даже внезависимости от того что есть «поток» — stream или thread.


 
Lamer@fools.ua ©   (2007-06-26 13:30) [2]

> И даже внезависимости от того что есть «поток» — stream
> или thread.


... или поток сознания :-)


 
sergeyst ©   (2007-06-26 14:00) [3]

fs := TFileStream("aaa.txt", fmOpenRead);
Как добавить сюда строку?


 
Kerk ©   (2007-06-26 14:03) [4]

Узнаю брата Васю.. тьфу.. форум... процент даунов зашкаливает


 
wicked ©   (2007-06-26 14:05) [5]


> fs := TFileStream("aaa.txt", fmOpenRead);
> Как добавить сюда строку?

fs.Write(@s[1], Length(s))
пора уже в фак выносить


 
sergeyst ©   (2007-06-26 14:09) [6]


> Kerk ©   (26.06.07 14:03) [4]

злой ты


 
Сергей М. ©   (2007-06-26 14:27) [7]


> sergeyst ©   (26.06.07 14:00) [3]
>
> fs := TFileStream("aaa.txt", fmOpenRead);
> Как добавить сюда строку?


Никак.
Я тоже злой)


 
sergeyst ©   (2007-06-26 15:15) [8]


> Сергей М. ©   (26.06.07 14:27) [7]

> Никак. - это по злости или правда? А как же wicked ©   (26.06.07 14:05) [5] ?


 
homm ©   (2007-06-26 15:17) [9]

>
> > Никак. - это по злости или правда? А как же wicked ©  
> (26.06.07 14:05) [5] ?

Включи моск. Как ты добавить строку в файл, коотрый открыл для чтения?


 
sergeyst ©   (2007-06-26 15:26) [10]


> homm ©   (26.06.07 15:17) [9]

fmOpenRead


 
sergeyst ©   (2007-06-26 15:27) [11]

т.е. fmOpenReadWrite


 
Сергей М. ©   (2007-06-26 15:29) [12]


> sergeyst ©   (26.06.07 15:15) [8]
> > Никак. - это по злости или правда?


Это злая правда злой суровой жизни - нельзя курочить то что тебе не дозволено.


> А как же wicked


Он спросонья не увидел read


 
Сергей М. ©   (2007-06-26 15:30) [13]


> т.е. fmOpenReadWrite


Это же другой коленкор)


 
homm ©   (2007-06-26 15:34) [14]

> [11] sergeyst ©   (26.06.07 15:27)
> т.е. fmOpenReadWrite

Вот теперь правильно.


 
oldman ©   (2007-06-26 15:35) [15]


> sergeyst ©   (26.06.07 15:27) [11]


Так тебе в поток добавить или в файл записать???


 
P   (2007-06-26 15:37) [16]


procedure TForm1.Button1Click(Sender: TObject);
var
 f1: TFileStream;
 mystr: string;
begin
 if not FileExists(Myfile) then
   f1 := TFileStream.Create(Myfile, fmCreate or fmShareExclusive)
 else
   f1 := TFileStream.Create(Myfile, fmOpenReadWrite or fmShareExclusive);
 try
   mystr := "bu-ga-ga";
   f1.Write(mystr[1], length(mystr));

 finally
   f1.Free;
 end;
end;


 
Сергей М. ©   (2007-06-26 15:39) [17]


> oldman ©   (26.06.07 15:35) [15]


Ему по колено - он чатом каким-то озабочен)...
Непонятно с какой луны свалившиммся, но в котором якобы есть "строки" и "потоки")
Вот он и окучивает TFileStream, благо в названии класса есть что-то напоминающее вожделенный "поток")


 
Плохиш ©   (2007-06-26 15:41) [18]

Нифигасе, а я так и не понял, куда надо добавить строку... Велика и могуча руска языка...


 
sergeyst ©   (2007-06-26 15:42) [19]


> oldman ©   (26.06.07 15:35) [15]

В поток.
Ну вообще-то мне нужно узнать какой тип данных мне послали по чату. Вот я и хочу все данные пересылать SendStream, а там уже фильтровать.

> Сергей М. ©   (26.06.07 15:39) [17]

Не только им


 
Сергей М. ©   (2007-06-26 15:43) [20]


> sergeyst ©   (26.06.07 15:42) [19]


> Не только им


Было бы станным, если бы только им)


 
oldman ©   (2007-06-26 15:44) [21]


> Ну вообще-то мне нужно узнать какой тип данных мне послали
> по чату.


Тебе там можно N типов данных слать? Прямо вот в чате???


 
P   (2007-06-26 15:44) [22]


> sergeyst ©   (26.06.07 15:42) [19]


пиши протокол уровня приложения. Сперва узнай что такое OSI потом будешь уже писать чат.

http://www.citforum.ru/nets/switche/osi.shtml


 
Сергей М. ©   (2007-06-26 15:44) [23]


> вообще-то мне нужно узнать какой тип данных мне послали
> по чату.


Тебе же уже сказали - ищи и изучай ПИО этого чата !
В чем проблема-то ?


 
Сергей М. ©   (2007-06-26 15:47) [24]

Ноги растут отсюда:

http://delphimaster.net/view/2-1182836764/


 
sergeyst ©   (2007-06-26 15:47) [25]


> Сергей М. ©   (26.06.07 15:44) [23]

Не успел спросить что это такое.


 
Сергей М. ©   (2007-06-26 15:48) [26]

ПИО = Протокол Информационного Обмена.

Помогло ?


 
sergeyst ©   (2007-06-26 15:51) [27]


> Сергей М. ©   (26.06.07 15:48) [26]

Это совет сделать протокол самому?


 
homm ©   (2007-06-26 15:52) [28]

> [27] sergeyst ©   (26.06.07 15:51)

Ч есделать то? Тебе ясно написано, изучить.


 
Сергей М. ©   (2007-06-26 15:54) [29]


> sergeyst ©   (26.06.07 15:51) [27]
> Это совет сделать протокол самому?


Да.

Особенно - для чужого, уже существующего чата.

Долой дискриминацию, не позволяющую лезть со своим уставом в чужой монастырь !)


 
sergeyst ©   (2007-06-26 15:55) [30]


> homm ©   (26.06.07 15:52) [28]

P   (26.06.07 15:44) [22] - то, что находится по этой ссылке, я уже читал когда-то. Ну и как мне это знание может помочь?


 
Сергей М. ©   (2007-06-26 16:03) [31]


> sergeyst ©   (26.06.07 15:55) [30]


> как мне это знание может помочь?


тебе это может помочь хотя бы в части 7-го уровня.


 
sergeyst ©   (2007-06-26 16:14) [32]

Долой дискриминацию, не позволяющую лезть со своим уставом в чужой монастырь !) - Полностью поддерживаю. Вот, только, чат надо делать с 0. Какие примеры в сети ни нашел (в т.ч. на этом сайте) - пересылка файлов не работает.

> тебе это может помочь хотя бы в части 7-го уровня.

Ну и как ими мне пользоваться через TClientSocket/TServerSocket?


 
homm ©   (2007-06-26 16:17) [33]

> Долой дискриминацию, не позволяющую лезть со своим уставом
> в чужой монастырь !) - Полностью поддерживаю.

Невменяемый? Это вообще-то стеб был над тобой.


 
oldman ©   (2007-06-26 16:18) [34]


> Вот, только, чат надо делать с 0. Какие примеры в сети ни
> нашел (в т.ч. на этом сайте) - пересылка файлов не работает.
>


Каких файлов и куда?
имхо, не чат надо делать с 0...


 
Сергей М. ©   (2007-06-26 16:18) [35]


> sergeyst ©   (26.06.07 16:14) [32]


> чат надо делать с 0


Надо знач надо)

Почему бы не начать свою грустную историю именно с этой фразой ?

Твой предыдущий пост уже прикрыли фактически за отсутствии оной, а тебе все невдомек)

Ну нельзя же так тупить)..


> как ими мне пользоваться через TClientSocket/TServerSocket?


А что конкретно непонятно ?

Ты уже ПИО разработал ?

Если нет, то какого ляда взялся за компоненты ?

Выбор компонентов - этап, следующий ЗА разработкой ПИО !

Бельмес ?)


 
Kerk ©   (2007-06-26 16:22) [36]

На http://code.progler.ru/tags/Чат выбери себе любой


 
sergeyst ©   (2007-06-26 16:31) [37]


> Невменяемый?

 Вариант один?


 
sergeyst ©   (2007-06-26 16:35) [38]


> Сергей М. ©   (26.06.07 16:18) [35]

Я потому и спрашиваю, потому что не знаю за что там браться вначале и в конце.
>Kerk ©   (26.06.07 16:22) [36]
спасибо за ссылочку


 
P   (2007-06-26 16:37) [39]


> sergeyst ©   (26.06.07 16:31) [37]
>
>
> > Невменяемый?
>
>  Вариант один?


Разработай сперва App-протокол в виде набора команд передающихся по соединению

номер версии протокола(4 байта)|числовой идентификтор команды(4 байта)|размер данных команды(4 байта)|данные команды(размер данных команды)|


 
Сергей М. ©   (2007-06-26 16:38) [40]


> а что там браться


Где "там" ?

Ты свой ПИО  уже разработал ? Или взял на вооружениие чужой ?

Только - я тебя умоляю - не говори, что не понимаешь, что такое информационный обмен и что такое протокол (евойный в частности)



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

Форум: "Прочее";
Текущий архив: 2007.07.29;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.55 MB
Время: 0.041 c
2-1183480740
Zablkon
2007-07-03 20:39
2007.07.29
Преобразование типов


3-1177310371
bam
2007-04-23 10:39
2007.07.29
кодировка dbf


15-1183264622
koha
2007-07-01 08:37
2007.07.29
Просмотрел фильм "Курск Субмарина в мутной воде"


11-1166423282
ebz
2006-12-18 09:28
2007.07.29
KOL History


15-1182875275
Malik
2007-06-26 20:27
2007.07.29
Чисто из интереса...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский