Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - igarexa

Страницы: [1] 2 3 4 5 ... 25 Далее
1
Hard'n'Soft / Очень странная, необычная проблема с интернетом.
« : 15 Декабрь 2012, 14:56:26 »
Привет всем! Пожалуй начну сразу с объяснением проблемы.
Значит так, имеется проблема с соединением интернета. Уже примерно неделю. Что наблюдается:
1. Комп №1: XP, подключаю интернет кабелем напрямую. Соединение реагирует странно. На сетевой карте лампочка мигает переодически, с одним ровным интервалом в ¬ 2-3 секунды. Винда выводит сообщение, что кабель отсоединяется, и присоединяется, я так понимаю (в Local area connection).
2. Роутер: Лампочка подключения интернета горит 3-4 секунды, каждые 10-15 секунд.  Интернет, конечно же не раздаёт. Локальная сеть вроде в норме. Пробовал делать ребут роутеря несколько раз, переустонавливал, перенастраивал - не помогает.
3. Комп №2: Win7, интернет работает только если подключаю главный кабель напрямую.

Главные кабель интернета пережимал заного - всё тоже самое, значит контакты в порядке.
События:
Где то 1.5 - 2 недели назад, у провайдера случилась проблема (скорее всего в нашем доме). Сказали приедут - починят.
Звонил провайдеру несколько раз, вобщем что они мне сказали коротко: раз провод интернет раздаёт, значит проблема у тебя, перенастрой роутер, или роутеру пришёл конец.
Вчера, интернет снова работал, но под вечер пропал, и опять всё повторилось: работает только на Компе №2.

Собственно в чём вопрос:
В чём может быть проблема? Как мне узнать? Как проверить? Что сказать провайдеру, при следующем разговоре, если понадобиться снова звонить?

2
Hard'n'Soft / Re: Выявить причину лагов интернета.
« : 26 Сентябрь 2012, 23:02:14 »
GalaxyBot,  да проверял, и с чистой виндой тормозит, и в safe mode..

CrazyMax,  посмотрел, пока понятно не очень много, но то что я считаю понятным мне странным не кажется :) Всмысле большая часть используется моим компом (судя по адресу, как я понал), конечно есть странное "Can not obtain ownership information", а вообще ничего ворующего инет не заметил)) Но я покопаюсь ещё в этом, довольно полезная функция, о которой я раньше не знал.

А пока, я так понимаю, сводится к тому, что провайдер редиска. Видимо надо будет пататься расторгнуть договор, ну или ультиматут ставить: или чините - или пока..

3
Hard'n'Soft / Выявить причину лагов интернета.
« : 26 Сентябрь 2012, 20:00:23 »
Привет всем, кто читает  :)

Опишу ситуацию:
Каждый вечер тормозит интернет, и не просто тормозит, а просто                как тормозит, доходит до того что скайп уходит в оффлайн каждые 2-3 минуты на 20 секунд (не загружая интернет чем-либо другим, естественно). С пятницы по воскресенье это усиливается в разы.
В последнее время (месяцы) это случается и по утрам - переодически зависает интернет соединение каждые ~3 минуты (как уже сказал, вплоть до выключения скайпа.....).
Всё как бы указывает на забитый канал (как я понимаю). Но провайдер утверждает что с каналом всё в порадке.

По идее, заявленная скорость 25 мбит/сек download, и 15 мбит/сек upload. Я понимаю, что обычно указываеться скорость "до", но у них на сайте наоборот отнекиваются, и твердят что так делают в других компания, но только не у них. У них "типа" всё в порядке. Ну это то ладно, мне было бы не сильно важно, если бы падала по вечерам до 10.......
Но что вижу я: Замер скорости на спидтесте - 0.xx Мбит/сек download и upload , пинг же поднимается вплоть до 1000.

Скажу сразу, я звоню в тех. поддержку своего провайдера чаще чем кому либо..... Постоянно говорю о проблеме, но они, конечно же, видят проблему во мне. Как не позвоню - проверь антивирус, проверь без рутера, проверь без фаервола, проверь то, сё, на своём компе.
Я проверял на разных компах, напрямую присоеденнёным проводом. В safe mode with networking - всё то же самое.....  И если бы проблема была во мне, то почему скорость интернета зависит от времени дня? В дождливую субботу интернета словно нету.
Вобщем, не знают они в чём проблема, но уверяют что с их стороны всё в порядке.

Недавно из мужик техподдержки сказали, будто он видит у меня большой upload, причём у меня все посторонние программы разумеется выключены. Это так, для информации... может нужно для "дела"...))


Так вот, суть данной темя. Ребята, подскажите пожалуйста что я могу сделать, что бы узнать причину? Может мониторинг соединения как то просмотреть? Или продиагностировать что-то? Как я могу способствовать устранении проблемы?

P.S.: Смена провайдера пока не вариант (а мысли есть) - договор ещё не окончен, да и альтернатива вроде лишь одна, и она дороже...

4
Игры на персональном компьютере / Re: Diablo 3
« : 26 Август 2012, 21:06:46 »
Ребят, кто-нибудь знает уже можно играть на халяву?)) просто ютуб, да и инет забит всякими патчами\кряками\генераторами ключей. Работает ли?

5
Hard'n'Soft / Re: Помогите подключиться к интернету..
« : 18 Июль 2012, 18:32:28 »
Мда.. вот чёрт, как же я мало знаю)) Ну ясно, спасибо. Буду пробовать другой способ значит)
Добавлено позже:
Продолжаем)

Значит новая идея: сделать локальную сеть через wi-fi между 2мя лаптопами.
Сделал несколько раз по этой схеме
Сеть видна, приконнектиться можно, только на 2м компе, пишет unidentified network, и, соответственно нет интернета...
Проблему прогуглил, но, я так понял, это может быть в разных случаях... так что захотел узнать у вас)
Ребят, что делать?  :)

6
Hard'n'Soft / Re: Помогите подключиться к интернету..
« : 18 Июль 2012, 12:22:43 »
Yaranga, такая же ситуация, верно :)
Ну, было полезным узнать про МАС адрес, который я введу позже, когда всё же получиться зайти в настройки роутера....
Всё ещё не получается.. и через эксплорер тоже пытался все адреса вводить - не грузится.

А может ли быть такое, что без участия провайдера мне этого не получиться сделать? Или проблема только с моей стороны?

7
Hard'n'Soft / Re: Помогите подключиться к интернету..
« : 17 Июль 2012, 20:17:23 »
Всем привет! Снова я со своими проблемами))

Помогите пожалуйста разобраться с подключением к Интернету. Опишу ситуацию:
Имеется главный кабель интернета, который подключен к роутеру. Из этого роутера по проводам хочу передать инет ко всем компьютерам далее.
Если подключаю 1 неважно какой компьютер, то инет работает. А вот если подсоединяю ко второму - то на 2 уже нет. Провода проверил, обжал правильно.

Судя по всему надо всё настроить.... вот с этим и проблема. Уже пол дня роюсь в инете, читаю статьи, пробую различные варианты. А всё не получается.

Начну с того, что немогу зайти в настройки роутера (перепробовал все возможные адреса...). Модель - eusso ush5008 xpc .   Мануал в инете нашёл, но он просто настолько бледный, что никакой ценной информации не принёс.
Ребят, что делать?  o_0

8
Hard'n'Soft / Re: Выбор нового компьютера
« : 12 Июль 2012, 21:04:55 »
Всем привет, снова я..

Прочитал много статей, смотрел тесты. За основу выбора брал тест где 2 идентичных компьютера (за исключением видео карт) тестировались на всё что угодно. Коротко о результатах: энергопотребление и теплоотдача несильно менялись. Вобщем всё не сильно отличалось, кроме теста производительности игр. Игры на дискретной видюхи шли в 3 раза лучше (по фпс). Понимаю, что ноут надо брать не для игр, но всё же хочется лучше.
Видеоадаптеры теста:
1. Интегрированный Intel HD Graphics, до 1 ГБ буфер в ОЗУ, поддержка DirectX 10
2. Дискретный ATI Mobility Radeon HD 5470, 1 ГБ выделенной GDDR3 памяти, поддержка DirectX 11 (бенчмарк 312)
Ну это так инфа, просто что бы показать ход моих мыслей, по которым я собираюсь покупать ноут.

Ребят, помогите пожалуйста определитьсяс выбором ноута. Вобщем облазил все толковые инет-магазины. Появились несколько претендентов. Что бы легче было ориентироваться, скину сразу бенчмарки процессоров и видео-карт (в скобках).

1. HP cpu A4-3305M 1.9GHz (1463) , video AMD Radeon HD 6480G (359)
2. ACER cpu Intel Pentium Processor B950 2.1 GHz (1944), video Nvidia GeForce GT 520M (390)
3. ACER2 cpu Intel® Core™ i3-380M 2.5Ghz (2342) video Intel® HD Graphics
4. Compaq... cpu Intel Pentium B950 2.1 (1944) video Intel® HD Graphics (просто потому что уж дешёвый...)


Господа, какой из них лучше?  :) И насколько он опережает других?
 Глаз мой лежит на 2.претенденте: ACER Проц вроде хорошо, и видюха сравнительно сильная, частоты выше других....

9
Hard'n'Soft / Re: Выбор нового компьютера
« : 01 Июль 2012, 15:02:06 »
aptyp,  благодарю за инфу)

Сделал заказ 3-его варианта HP Compaq Presario CQ57-383SR. Утром обнаружил на 30$ дешевле такой же самый, придётся перезаказвать в другом месте))
Хоть дошло не сразу, что он не совсем HP, а Compaq (в нете прочитал что компакю перешёл во владения HP)..
В принципе, почитав отзывы о данной компании,не совсем имею представление о качестве данного продукта. Слишком разная инфа, и разные мнения. У кого то хорошо, а кто то не доволен. Ну думаю это будет зависеть от пользователя)) (я надеюсь по крайней мере)

Кто-нибудь из присутствующих может сказать что-нибудь о компании Compaq ? ))

10
Hard'n'Soft / Re: Выбор нового компьютера
« : 30 Июнь 2012, 18:54:56 »
aptyp,  Спасибо за информацию :)
А как Ты определил про видео? Просто слова Intel HD Graphic мало о чём говорят.... ни обьёма, ни частот. И Это ведь интегрированые карты? Как они себя могут показать в игрушках?

11
Hard'n'Soft / Re: Выбор нового компьютера
« : 30 Июнь 2012, 16:16:18 »
Всем привет! Решил я приобрести новый ноут. И хотелось бы услышать выши комментарии и мнение по поводу претендентов.
А вот собственно и они:
Fujitsu
Toshiba
HP

Первый вопрос о тошибе: у него процессов AMD Dual Core E-450 Processor 1.65GHz, (в нете прочитал что это APU, тоесть и процессор компьютера, и графический одновременно) Хорошо ли это? Ди и кеш двухуровневый и 1 мб. Так эа что такая цена, если фуджитсу проц в разы лучше (у фуджи Intel Pentium P6200 / 2.13 GHz / 3 MB (трёхуровненый я так понял)
Да и на http://www.cpubenchmark.net фуджи опять таки впереди?

И большая просьба отценить HP ноут. Что вы о нём думаете?

И что вы можете сказать о данных производителях?

12
О сайте Emu-Land.net / Re: SMF v2.0 обновление форума
« : 24 Май 2012, 22:30:01 »
Круто! Перемены к лучшему)) Хотя старый больше по душе))

13
Игры на персональном компьютере / Re: League of Legends
« : 24 Май 2012, 22:26:59 »
К новой графике привык за пару игр :) по-моему лучше стало, хотя карта большая слишком, да и обещенного прироста производительности не заметил...
В доту не играл, но даже если похоже, это не имеет никокого значения :) Наоборот, если какая либо вещь в другом проекте интересная, то думаю стоит её подобрать... уникальность не всегда есть лучше ))

Nereid-sama,  да, тоже заметил такое, но сделав больше разрешение, как то лучше стало... повозись ещё))

14
Игры на персональном компьютере / Re: League of Legends
« : 22 Май 2012, 23:48:19 »
Carcass,  :lol: смешно получилось))))

А по теме )) да и фиг с этой перерисовкой))) По моему, баланс всё же сильно хромает, над ним работать надо. А то как то поднадоели эти эксперименты, на одной неделе героя ослбляют, на следующей снова усиляют, или же наоборот.
Да и ОП чемпы всем известны, каждую ранкед игру банят, и с ними ничего не делают, привязываются к другим герям, не нравится, видите ли им что то.

Да кстати, минус большой в том, что шмоток по сути мало. (если бросились считать, и уверять меня в обратном - читайте дальше) Дело в том, что практически каждый "класс" героя имеет один билд (есть пару исключений, например из магов - райз (единственный танко-маг)).
Я исхожу из рациональности, тоесть если герой ад керри - то и покупать надо соответсвтенно. Но получается так: ад керри - берём инфинити, бладфёрстер и тд. маг -шапка, род оф ейджес, и тому подобное. Вобщем в лейт гейме шмотки по сути у всем одинаковые, единственное отличие может быть в последовательности покупки. Ну и в возможностях покупки))

Вобщем - было бы куда лучше, если бы было вещей раза так в 2 больше, делались бы из менее популярных вещей (например как эта маска с 20 magic penetration), и имели бы свои интересные уникальные пассивки.

Вот так то  ^_^

15
Hard'n'Soft / Re: Windows 7
« : 09 Май 2012, 23:41:12 »
Demon, Можно поинтересоваться с какой целью так делают?))

16
Игры на персональном компьютере / Re: League of Legends
« : 06 Май 2012, 22:28:05 »
Игра хорошая, но играть лучше с выключенным чатом :) Столько нервных неадекватов я нигде больше не встречал)))

17
Hard'n'Soft / Re: Вспоминаем Turbo Pascal и решаем задачи на нём
« : 06 Май 2012, 20:59:17 »
Yoti, это и есть тот страшный материал)) (сама программа)
Мне её дали, и сказали добавить возмоность соеденения 2х файлов.
Я как бы наткнулся на процедуру слияния файлов
Код: [Выделить]
procedure merge ( var fff:MyfileType; filename: string; var FileOpen: boolean);
var
  a, b: integer;
  eof_a, eof_b: boolean;
begin
writeln('Vvedi nazvanie 1-go fajla');
read(filename);
  assign(f2, filename);
  reset(f2);
  writeln('Vvedi nazvanie 2-go fajla');
read(filename);
  assign(f3, filename);
  reset(f3);

  rewrite(f4);

  eof_a := eof(f2); if not eof_a then read(f2, a);
  eof_b := eof(f3); if not eof_b then read(f3, b);
  while (not eof_a) and (not eof_b) do begin
    if a < b then begin
      write(f4, a);
      eof_a := eof(f2); if not eof_a then read(f2, a);
    end
    else begin
      write(f4, b);
      eof_b := eof(f3); if not eof_b then read(f3, b);
    end;
  end;

  if eof_a then begin
    write(f4, b);
    while not eof(f3) do begin
      read(f3, b); write(f4, b);
    end;
  end
  else begin
    write(f4, a);
    while not eof(f2) do begin
      read(f2, a); write(f4, a);
    end;
  end;
  close(f4);
end;надеюсь что правильная)), и теперь хочу внедрить её в эту программу.

Цитата
значит, что ты переменные не сVARил)
да, прочитал насчёт жтой ошибки, попробовал дать f2,f3,f4 все возможные типы данных которые я знаю, не полчилось ( видимо что то не допонимаю, или же не там это делаю...

Цитата
Программа для курсов кройки и шитья?))
Цитата
Про какую фальш (фальж) там столь упоминаний?))
А, не оброщай вниммания))) это я переводил с латышского на русский побырому))

Добавлено позже:
Апдейт информации  :)
Вобщем нашёл я готовый похожий вариант моей работы. Та процедура, которую я хотел "запилить" в программу совсем не то что надо..... Всё оказалось сложнее, сам бы не сделал.
Единственная проблема, что где то есть небольшая ошибка (программа скомпилировалась, только файл вроде создаётся, а под конец программа вылетает, и объеденнёный файл при перезапуске уже не находит). Ну да ладно, повожусь ещё, а если не исправлю - сдам какая есть... хоть какие то пункты за неё получу.
Позже залью готовую (если будет) программу )) для интереса))

Спасибо всем за уделённое внимание))

18
Hard'n'Soft / Re: Windows 7
« : 05 Май 2012, 18:56:08 »
~Scorpion-, ShadowFlash, Да вот заходил на прошлой неделе в мастерскую-магазин, память DDR, планка 1 гига стоит 30$. Говорят дефицитная уже, это 3тий ддр сказали вагонами штампуют, а этот дороже, хоть и хуже...
А на ebay тяжело найти, не каждый в Латвию посылки делает, а кто делает, там и доплата идёт нормальная.
Появляются мысли, есть ли смысл в старый комп вкладываться... лучше уж новый брать.

19
Hard'n'Soft / Re: Windows 7
« : 05 Май 2012, 17:46:58 »
Вобщем погоняв 3 недели на семёрке, сделал вывод, что всё же 1 гиг мало для семёрки.
Оптимизировал я всё, что только можно было, отключил ненужные службы, убрал поиск, темы, восстоновление системы и т.д. и т.п.... Добавил ещё 256 метров памяти, но всё же не потянул так, как хотелось бы...
Нет, не так всё страшно, но сравнив с xp разница более чем ощутима)) Всё же чувствются тормоза там, где впринципе их быть не должно было..
Кстати были некоторые проблемы с драйверами, мол, не для 7 сделаны.
Но система пару дней назад полетела (начала блокировать файлы .msi) Умер microsoft installer и ещё много чего вобщем нельзя было восстоновить...
Ну перешёл обратно на xp.
Так, а теперь зачем пишу)) Инфа для таких же как я)) Если копм с 1 гигом, и процессор желает лучшего, советую всё же на xp оставаться))

20
Hard'n'Soft / Re: Вспоминаем Turbo Pascal и решаем задачи на нём
« : 05 Май 2012, 17:34:39 »
Yoti, Конечно покажу)) Раньше не получилось, система полетела....
Залил на http://ifolder.ru/30318665
Тут конечно черт ногу сломит, но благодарю что решил разобраться))

21
Hard'n'Soft / Re: Вспоминаем Turbo Pascal и решаем задачи на нём
« : 03 Май 2012, 19:10:37 »
и опять я)) господа программисты, тут такое дело))
вобщем, как я уже говорил, мне надо внедрить процедуру соеденения файлов, в уже готовую программу, и, как и ожидалось, конечно же столкнулся с неизбежной проблемой: "не работает" ))
Помогите пожалуйста разобраться))) Программа сама сложная и большая, по этому напишу пожалуй процедуру создания файла, которая уже была, и ту процедуру слияния 2х файлов, которую я хочу внедрить (примеры нарыл в инете, внёс свои изменения).

Быть может, это и не понадобится, но в программе имеется это процедура создания файла:
Код: [Выделить]
procedure Fcreate(var fff:Myfiletype; filename:string; var FileOpen: boolean);
var RC, n, i: integer;
    answer : string[1];
    rec :MyRec;
label BUILD;
begin
assign(fff, filename);
{$I-}
RC:=13;
reset(fff);
{$I+}
RC:=ioresult;
if (RC=0) then
      if (FileRewr(filename) = FALSE) then
          begin
          close(fff);
          FileOpen:=False;
          MyFileErr:=1;
          exit;
          end;

{$I-}
rewrite(fff);
{$I+}
     if(IOResult<>0) then begin
                          MyFileErr:=3;
                          FileOpen:=False;
                          exit;
                          end;
       n:=NumOfRec;

       Rec.Name1:='                                              ';
       Rec.Name2:='                                              ';
       for i:=0 to n do
       begin
        Rec.name1:= chr($61 +i);
        Rec.name2:= chr($30 +i);
        write(fff,Rec);
       end;
close(fff);
          FileOpen:=False;
end;

Если честно, то мне мало что понятно в ней, но я так понимаю, создаётся файл, начальное название которого "filename"

Изходя из этого, вот прецедура слияния двуй файлов.
Код: [Выделить]
procedure merge ( var fff:MyfileType; filename: string; var FileOpen: boolean);
var
  a, b: integer;
  eof_a, eof_b: boolean;
begin
writeln('Vvedi nazvanie 1-go fajla');
read(filename);
  assign(f2, filename);
  reset(f2);
  writeln('Vvedi nazvanie 2-go fajla');
read(filename);
  assign(f3, filename);
  reset(f3);

  rewrite(f4);

  eof_a := eof(f2); if not eof_a then read(f2, a);
  eof_b := eof(f3); if not eof_b then read(f3, b);
  while (not eof_a) and (not eof_b) do begin
    if a < b then begin
      write(f4, a);
      eof_a := eof(f2); if not eof_a then read(f2, a);
    end
    else begin
      write(f4, b);
      eof_b := eof(f3); if not eof_b then read(f3, b);
    end;
  end;

  if eof_a then begin
    write(f4, b);
    while not eof(f3) do begin
      read(f3, b); write(f4, b);
    end;
  end
  else begin
    write(f4, a);
    while not eof(f2) do begin
      read(f2, a); write(f4, a);
    end;
  end;
  close(f4);
end;
Ход моих мыслей:
1. У меня имеется несколько ранее созданных файлов с разными названиями (программа без моей процедуры всё реализует)
2. В моеё процедуре, сначала я вписываю название 1го, программа считывает, и соотносит его с переменной f2, со вторым так же, в f3.
3. Далее в процедуре уже составлен алгоритм слияния (его нашёл), и создаётся файл f4.

Есть пару вопросов, в правильную сторону ли я мыслю (всмысле можно ли так занести 2 файла в эту процедуру), правильная ли она?
Подключил я её так: procedure merge  ( var fff:Myfiletype; filename: string; var FileOpen: boolean);
Вызываю так: begin merge(MyData, MyDataOpen); end; (по аналогии с другими процедурами)

По идее программа жалуется лишь на то что Identifier not found на f2, f3, f4.

Не уверен, хватит ли этой информации, что бы разобраться, но очень прошу помощи :) Хотя понимаю что слишком много прошу, и справедливо можно было бы сказать: задолбал, иди делай сам)))) Но черт вазьми, рассмотрел весь материал что нам дали, никак не рабзерусь...


22
Hard'n'Soft / Re: Вспоминаем Turbo Pascal и решаем задачи на нём
« : 27 Апрель 2012, 22:20:15 »
Yoti,HardWareMan, Спасибо что указали где ошибки  :) Пришлось повозиться с этой програмкой...  Правда выяснилось, что надо использовать исходник, что мне дали, он более сложный, чем моя скромная програмка... вобщем попробую сделать ))

23
Hard'n'Soft / Re: Вспоминаем Turbo Pascal и решаем задачи на нём
« : 23 Апрель 2012, 00:29:07 »
Снова всем привет) И снова это я)

Я делаю програмку для обработки текста (создание файла, осмотр содержания файла и обьеденение 2х файлов (пока не дошёл)), и столкнулся с очередной проблемой. Ребят, помогите пожалуйста разобраться с ошибкой.
Вот основная программа:
Код: [Выделить]
program lab4;
uses filework;
var Tx, filename :integer;
label CASEPOINT;
    begin
CASEPOINT:
    writeln(' menu');
    writeln('1 - sozdatj novij fajl');
    writeln('2 - osmotretj fajl');
    writeln('3 - objedenitj 2 fajlaà');
    writeln('4 - zakon4itj rabotu ');
    readln (Oper);
    case (Oper) of
  1: begin
       FCreate(Tx, filename);
     end;

  2: begin
       FRead(Tx, filename);
       end;

 { 3: begin
       FMergin
     end;   }

  4: begin
       exit;
     end;
 end;

  goto CASEPOINT;


    end.

И вот модуль к ней:
Код: [Выделить]
unit filework;
interface
procedure Fcreate( var Tx: Text; FileName: String; s: String);
procedure FRead( var f :text; s:string);

implementation
uses CRT;
procedure FCreate;
Var
 Tx : Text;
 FileName : String;
 s : String;
 i,n : Integer;
Begin
 Writeln('vvedi nazvanie fajla');
 Readln (FileName);
 Assign(Tx,FileName);
 Rewrite (Tx);
 Writeln (vvedi koli4estvo strok');
 Readln(n);
 Writeln ('vvedi stroki');
 For i:=1 to n do
 Begin
  Readln (s);
  Writeln(Tx,s);
 End;
 Close(Tx);
End;

procedure Fread;
Var
   f : text;
   S : string;

begin
    clrscr;
    [b]assign(f, filename);[/b]
    reset(f);
    write(' ');
    while not Eof(f) do
        begin
           readln(f, S);
           write(S,' ');
        end;

    close(f);
    readln
end.
Есть подозрения, что проблем с подключением модуля, и с процедурами в нём намного больше, чем показывает компилятор..
Но вот собственно что мне не даёт покоя: Identifier not found "filename"
В коде я выделил это место. В гугле не очень много об этом написано, но вычитал примерно такое: "проблема бывает в паскале, используй делфи".
Помогите пожалуйтса с этим разобарться....


24
Hard'n'Soft / Re: Windows 7
« : 01 Апрель 2012, 20:16:17 »
Ну вот разные ответы начались) А кто нибудь сравнить быстродействие семёрки именно когда выключены все визуальные эффекты, ненужные процессы, и осталась лишь одна душа... ?

25
Hard'n'Soft / Re: Windows 7
« : 01 Апрель 2012, 18:51:50 »
Всем привет, быть может (скорее всего да) уже озвучивали данный вопрос, но я не нашёл ответа :)
Вопрос банальный, и наверное всех уже достал, но у меня есть некоторые неясности всё же..
Так вот: Что быстрее, семёрка, или xp?
Что бы не было грязи в мою сторону) Знаю, вопрос пережёван уже много раз, но информация, которую я нашёл, слишком противоречивая. Ознакомился с различными тестами на производительность. Опять же, где то 7, а где то хр пишут быстрее. Да и нашему форуму доверяю больше)
И вот ещё важный момент! Меня не интересует визуальный интерфейс систем. Всегда выключаю всё что можно, для большей производительности.
То есть, если сейчас на хр у меня вид как на 98, можно ли 7 настроить по максимуму так, что бы обгоняла хрюшу?
Думаю стоит оставить основые конф. компа. AMD Athlon 3700 (2.2 ghz), 1gb рама. (знаю, сказал мало, но для общего представления думаю сойдёт, вобщем не новый..)

Посоветуйте, пожалуйста, кто разбирается)

26
Hard'n'Soft / Re: Вспоминаем Turbo Pascal и решаем задачи на нём
« : 21 Февраль 2012, 01:34:10 »
koral, Огромное Спасибо за помощь :) Пошаманив, провозившись, испробовав вариаций 40 кода  :blush: , наконец догнал как делать :) Конечно, были проблемы, и уже начал писать новую просьбу о помощи, но что то меня осинило))

Если делал
Код: [Выделить]
Writeln(OutFile,#13#10#13#10, Outputstring); То в выводном файле, 2 раза писались строки со словами "бегин". И делались 3 пустые строки.

Вообщем, вот часть кода с обработкой файла:
Код: [Выделить]
  while (not EOF (InpFile)) do
  begin
   readln(InpFile, InputString);
  OutputString:=InputString;
    If Pos('BEGIN',OutputString) >0 then
   begin
   writeln(Outfile, #13#10);
   end;
   If Pos('begin',OutputString) >0 then
   begin
   writeln(Outfile, #13#10);
   end;
   writeln(Outfile,OutputString);
  end;
Цитата
И, кстати, зачем два раза повторять один и тот же кусок кода? Написать один if религия не позволяет?

Скорее не религия, а знания не позволяют :)
Пытался сделать с If ... or ... then , но выводило ошибку, я так понял, что то вроде компилятор ожидал тип булеан, а было лонгинт.
Ну думаю не столь важно :)

27
Hard'n'Soft / Re: Вспоминаем Turbo Pascal и решаем задачи на нём
« : 19 Февраль 2012, 21:57:34 »
Это снова я..  :-\
Ребята, тут написал программу с обработкой файлов, но столкнулся с 2 проблемами.
Цель: В программу ввести вводный файл, сделать его обработку, и результат вывести в другой текстовой файл. Если в вводном файле есть слова "begin" или "BEGIN", то перед данной строкой в выводном файле сделать 2 пустые строки.

С файлами я разобрался, и поиском слов "бегин" тоже, но, по неизвестной причине, все строчки, которые не имеют слов "бегин", не выводятся в выводной файл. а выводится лишь те, где они имеются.
И ещё один момент. Я могу дописать текст, перед словами "бегин", но не получается пропускать строки.

Выложу программу для наглядности.

Ну а вот и сам код:

28
6 поколение / Re: Вопросы о PlayStation 2
« : 24 Январь 2012, 16:27:40 »
Привет всем, ребят, помогите пожалуйста разобраться с этим.
Вот хочу узнать насчёт чиповки (понимаю, много раз об этом говорили, и я читал достаточно этом, но всё же у меня есть свои несколько вопросов, на которые ответов не нашёл).

В первую очередь, хотел бы спросить вот об этом. В магазине-мастерской вот такая информация:
 
Цитата
Переделка в мультисистему PS2 :    
 - используя  оригинальный модчип   ( работа занимает около 1-1.5 часа , гарантия 1 год  )   
25 Ls

 - используя  модчип-копию  ( работа занимает около 1-1.5 часа ,  гарантия 6 месяцев )   
15 Ls

Для сравнения 15Ls ~ 30$, и 25Ls ~ 50$

Какие отличия могут быть между оригинальным, и копией? Что посоветуете? И подходящая ли цена?
В эту мастерскую уже ходил, там сказали, что в принципе чиповка самый лучший способ играть в игры без лицензионного диска. Раскритиковал swap magic, и загрузку пиратского диска с помощью карты памяти. Как вы это отцените? Или всё же лучше уже с жёсткого пробовать играть?

И ещё, очень хотел бы узнать ваши комментарии по поводу этой
статьи. Неужели так много плоек погибает после чиповки?

Ну и вот информация ещё некоторая. У меня SCPH-70004, PAL.

И ещё :) Может быть вы сообщите мне какую нибудь полезную информацию по этой теме, чего я не спросил, но по Вашему мнению мне было бы полезно это узнать?  ^_^

29
Игры на персональном компьютере / Re: Какую игру из серии Half-Life вы считаете лучшей?
« : 18 Январь 2012, 20:20:18 »
Half-Life: Blue Shift ну просто очень нравится, проходил много раз :) Хотя, может быть, BSh мне больше по душе чем первая из за того, что она у меня появилась раньше чем просто халфа..
Ну и вторая без эпизодов, конечно же :)

Позже посмотрим что из себя будет представлять третий эпизод ;)

30
6 поколение / Re: Free MсBoot
« : 13 Январь 2012, 23:30:43 »
Тот же вопрос, можно ли с флешки кинуть на курту памяти этот фрилаунчер? Просто где то читал что так сейвы на ПК и наоборот кидали...

И ещё, это то же самое что и
?

Страницы: [1] 2 3 4 5 ... 25 Далее