Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
12.05.2010, 23:35
|
|
Участник форума
Регистрация: 29.08.2008
Сообщений: 151
Провел на форуме:
1551582
Репутация:
107
|
|
Сообщение от Failure
с х*я "-1" если (15 = 15) = 1 ?
BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string - преобразует булевское значение в строку. Если параметр UseBoolStrs имеет значение False, то результатом работы функции является одно из значений '0' или ‘-1’. Если же параметр UseBoolStrs имеет значение True, то результатом работы является одно из значений ‘FALSE’ или ‘TRUE’ (программист может задать другие значения; о том, как это сделать, читайте в справочнике по системе Delphi).
т.е. '-1' - это true
Последний раз редактировалось ZdezBilYa; 12.05.2010 в 23:37..
|
|
|
12.05.2010, 23:37
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме:
828081
Репутация:
84
|
|
Сообщение от Failure
с х*я "-1" если (15 = 15) = 1 ?  Перлы дельфи
Делай так:
ShowMessage(IntToStr(integer(false))); - показывает 0
ShowMessage(IntToStr(integer(true))); - показывает 1
|
|
|
|
13.05.2010, 11:32
|
|
Участник форума
Регистрация: 12.11.2008
Сообщений: 146
Провел на форуме:
592199
Репутация:
21
|
|
При работе с winsock
Как получить весь html код страницы?
Buffer2:array[1..1024] of char;
recv(Socket1,Buffer2,SizeOf(Buffer2),0);
memo1.lines.add(utf8toansi(Buffer2));
Получаю только начало((
Последний раз редактировалось denjf; 13.05.2010 в 12:06..
|
|
|
|
13.05.2010, 12:50
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме:
828081
Репутация:
84
|
|
Может потому что 1024 символа всего можно принять в Buffer2?
|
|
|
|
13.05.2010, 14:04
|
|
Участник форума
Регистрация: 23.08.2009
Сообщений: 133
Провел на форуме:
1952858
Репутация:
127
|
|
есть form1 и form2, progressbar1 и timer1
хочу сделать чтоб когда progressbar1.position был равен timer1.interval
закрывалась form1, а открывалась form2
подскажите как сделать?
|
|
|
|
13.05.2010, 14:10
|
|
Познавший АНТИЧАТ
Регистрация: 09.11.2009
Сообщений: 1,077
Провел на форуме:
7879791
Репутация:
265
|
|
Подскажите как сделать что бы текст из edit1 & edit2 при нажатии на кнопку дописывался в файл например http://blabla.ru/bla.txt
|
|
|
|
13.05.2010, 14:32
|
|
Участник форума
Регистрация: 01.03.2009
Сообщений: 121
Провел на форуме:
4022236
Репутация:
38
|
|
Сообщение от stepashka_
Подскажите как сделать что бы текст из edit1 & edit2 при нажатии на кнопку дописывался в файл например http://blabla.ru/bla.txt
PHP код:
procedure TForm1.Button1Click(Sender: TObject);
var
F : TextFile;
S, S2 : String;
begin
AssignFile(F, 'bla.txt');
Append(F);
S := Edit1.Text;
S2 := Edit2.Text;
WriteLn(F,S+S2);
CloseFile(F);
end;
|
|
|
|
13.05.2010, 15:19
|
|
Познающий
Регистрация: 14.05.2009
Сообщений: 92
Провел на форуме:
299447
Репутация:
5
|
|
Вопрос совсем не по делфи, но может знает кто.. Где можно взять звуки для программы?
Например: "Идёт соединение с сервером". И чтобы девушка с красивым голосом говорила :-) Самому записывать не предлагать.
Заранее всем спасибо)
|
|
|
|
13.05.2010, 15:27
|
|
Постоянный
Регистрация: 09.06.2005
Сообщений: 531
Провел на форуме:
3516666
Репутация:
439
|
|
http://www.findsounds.com/types.html
|
|
|
|
13.05.2010, 15:53
|
|
Познающий
Регистрация: 14.05.2009
Сообщений: 92
Провел на форуме:
299447
Репутация:
5
|
|
Что-то ничего толкового там нет, тупо вопли, смех и прочее..
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
