Клуб программистовлюбые вопросы по PHP, С++, JAVA, Python, Perl

Есть знатоки? 24.06.09 Ответов: 5

Есть люди которые разбираются в java скриптах? Пишите ЛС! Нужна ваша помощь

Господа программисты! У меня вопрос – каким образом вы делаете возможным обмен сообщениями между пользователями? А то я пишу класс на PHP для этого. Если кого заинтересует, могу скинуть, когда закончу.

Народ кто знает в каком файле в apache 2.2 настроить кодировку по умолчанию utf-8. Фаил conf и остальные смотрел,default charset не нашел.

ANSI C 24.06.09 Ответов: 27

Всем привет! Я только начинаю работать в сабже, до этого все больше VB.NET, php… Вот, собственно, такой вопрос – как в сабже выполнить консольную команду в фоновом режиме и считать первую вернувшуюся строку? Если более конкретно – надо получить адрес первого узла при трассировке любого ip. То есть выполнить команду, к примеру, tracert ya.ru и, как только получена первая строка с ip-адресом ближайшего узла, прекратить выполнение команды, а полученные данные сохранить в буфере для последующей работы. Да, буду крайне признателен, если скажете, где можно почитать маны по работе с консолью из сабжа.

Program nards;
Uses crt,graph,mouse_os;
Const
kolvo_punkt=3;
name_punkt:array[1..kolvo_punkt] of string =('Play','Infomation','Exit');
Type
xy=record
x:integer;
y:integer;
end;
Var
zam,m,z:integer;
pos:array [1..12,1..24] of xy;
mesto_fishek:array [1..12,1..24] of integer;
sucs:boolean;
n,c,d,xto:integer;
x,y,h,v:integer;
lt,rt,ct:boolean;
kolvo,t:longint;
but:integer;
punkt,driver,mode,i,k:integer;
key:char;
s,s1:string;

procedure load;
var i:integer; ch:char;
begin
cleardevice;
setbkcolor (0);
setcolor(2);
outtextxy(300,390,'Starting game');
setfillstyle(4,4);
for i:=50 to 590 do
begin
bar(50,400,i,402);
delay(1000);
end;
setfillstyle(1,0);
bar(1,1,640,480);
outtextxy(320,240,'To start game please " press Enter "');
repeat
ch:=readkey;
until ch=#13;
cleardevice;
End;

Procedure menu (numb_punkt:integer);
Const
h_punkt=30;
h_prom=20;
w_punkt=100;
x_beg=300-round(w_punkt/2);
h_menu=h_punkt-kolvo_punkt+h_prom+(kolvo_punkt-1);
y_beg=200-round(h_menu/2);
Var i,x2,y1,y2:integer;
Begin
for i:=1 to kolvo_punkt do
begin
if i=numb_punkt then setfillstyle(6,2) else setfillstyle(7,14);
y1:=y_beg+(h_punkt+h_prom)*(i-1);
x2:=x_beg+w_punkt;
y2:=y1+h_punkt;
bar3d(x_beg,y1,x2,y2,3,topon);
settextjustify(1,1);
outtextxy(300,y1+round(h_punkt/2),name_punkt[i]);
end;
End;

Procedure draw_desk;
var i:integer;
Begin
setfillstyle(1,6);
bar(0,0,440,280);
setfillstyle(1,15);
bar(20,20,420,260);
setfillstyle(1,6);
bar(210,20,220,260);
setcolor(15);
setfillstyle(1,15);
for i:=1 to 6 do pieslice (32*i,20,0,360,10);
for i:=1 to 6 do pieslice (32*i,280-20,0,360,10);
for i:=1 to 6 do pieslice (205+32*i,20,0,360,10);
for i:=1 to 6 do pieslice (205+32*i,280-20,0,360,10);
end;

Procedure kubik(a,b:integer);
Begin
randomize;
setcolor(2);
if (a<1) and (b<1) then
begin
a:=random(6)+1;
b:=random(6)+1;
end;
c:=a;
d:=b;
if a=1 then
begin
setfillstyle (1,14);
bar3d (445,12,465,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (455,22,0,360,4);
end;
if a=2 then
begin
setfillstyle (1,14);
bar3d (445,12,465,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (451,22,0,360,2);
pieslice (459,22,0,360,2);
end;
if a=3 then
begin
setfillstyle (1,14);
bar3d (445,12,465,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (449,17,0,360,2);
pieslice (455,22,0,360,2);
pieslice (461,27,0,360,2);
end;
if a=4 then
begin
setfillstyle (1,14);
bar3d (445,12,465,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (451,17,0,360,2);
pieslice (460,17,0,360,2);
pieslice (460,27,0,360,2);
pieslice (451,27,0,360,2);
end;
if a=5 then
begin
setfillstyle (1,14);
bar3d (445,12,465,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (451,17,0,360,2);
pieslice (460,17,0,360,2);
pieslice (460,27,0,360,2);
pieslice (451,27,0,360,2);
pieslice (455,22,0,360,2);
end;
if a=6 then
begin
setfillstyle (1,14);
bar3d (445,12,465,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (450,17,0,360,2);
pieslice (460,17,0,360,2);
pieslice (455,17,0,360,2);
pieslice (450,27,0,360,2);
pieslice (460,27,0,360,2);
pieslice (455,27,0,360,2);
end;
if b=1 then
begin
setfillstyle (1,14);
bar3d (475,12,495,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (485,22,0,360,4);
end;
if b=2 then
begin
setfillstyle (1,14);
bar3d (475,12,495,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (481,22,0,360,2);
pieslice (489,22,0,360,2);
end;
if b=3 then
begin
setfillstyle (1,14);
bar3d (475,12,495,32,10,true);
setcolor(2);
setfillstyle(1,2);
pieslice (479,17,0,360,2);
pieslice (485,22,0,360,2);
pieslice (491,

Форум на //beneto.ru 22.06.09 Ответов: 21

Смотрим опрос или отписываемся…

Помогите мне пожалуйста:
Мне надо создать ЛОКАЛЬНЫЙ ASP сервер.
Создать приложение на FLASH 9, в котором есть одна кнопочка, при нажатии которой отправляется запрос на ASP сервер, и по этому запросу получает какие-то данные (переменные).
Преподаватель обьяснял: Есть браузер, в нем флеш приложение, и надо получить данные с асп сервера…
Я буду делать на C# в Visual studio 2005.
Помогите мне пожалуйста.
Очень надо

Есть такое задание: нужно с паспорта взять данные и заполнить ихв форму. Как это можно реализовать на Delphi / VС++? Как понимаю нужно использовать TWAIN, но здесь получим просто рисунок,а мне нужен текст…

Так как здесь можно встретить много умных людей, пишу сюда. Требуются подкастеры, или бывалые или только начинающие ,для создания подкаст шоу, для новостного сайта. Подкасты будут ИТ тематики, новости, релизы и т.д. Кому интересно пишите в ЛС.

Неплохо программирую на C\С++\С#, но возникла необходимость в PHP, ни одной строчки кода на нем не писал. Хотелось бы учебник в котором описывается создание какого нибудь конкретного сайта с нуля, а не просто справочник по Php

Киньте пожалуйста ссылку на сайты где можно скачать книгу по VisualStudio 2008, а то я уже весь нет перерыл и нифига не нашел!

Доброго, товарищи) не подскажете ли, каким образом можно реализовать сабж? С винампом и прочими плеерами, эмулирующими его окно, проблем нет, а вот с jetAudio и Windows Media Player'ом – проблема.. нагуглил несколько наработок для этого, но были они на сях, с которыми я не дружу, поскольку вообще в целом прикладным кодерством не занимаюсь, просто необходимо быстро составить вот такую программулину) Заранее благодарен за толковые ответы.

Клуб программистов работает уже ой-ой-ой сколько, а если поточнее, то с 2007 года.