ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #3621  
Старый 21.05.2009, 19:40
МongBa†
Познающий
Регистрация: 12.05.2009
Сообщений: 45
Провел на форуме:
255342

Репутация: 28
Отправить сообщение для МongBa† с помощью ICQ
По умолчанию

Цитата:
Сообщение от DTW  
как сделать чтоб оператор case выдавал варианты из введеного слово ?
Case со словами не работает, if-ками решай )
можно поизвращаццо с array [0..N] of string, в цикле for искать значение = введенному и передавать ИД case-у , но это реально изврат )
 
Ответить с цитированием

  #3622  
Старый 21.05.2009, 21:29
diznt
Постоянный
Регистрация: 31.01.2008
Сообщений: 643
Провел на форуме:
6128108

Репутация: 445


По умолчанию

Если в цикле прописать "exit;" (без ковычек) то цикл будет начинаться заного после этой команды?
 
Ответить с цитированием

  #3623  
Старый 21.05.2009, 22:22
Hellsp@wn
Постоянный
Регистрация: 29.04.2007
Сообщений: 496
Провел на форуме:
2715445

Репутация: 588
По умолчанию

diznt
нет, можно написать continue и тогда цикл пойдёт дальше.
 
Ответить с цитированием

  #3624  
Старый 22.05.2009, 12:45
Djezul
Познающий
Регистрация: 08.12.2008
Сообщений: 58
Провел на форуме:
153361

Репутация: 10
По умолчанию

народ помогите решить 3 задачи на паскале, писал в соседнем топике но там никто не отвечает уже 3 дня, готов даже заплатить (просто срочно нужно до завтра), вот задачи:
1. Дан текстовый файл с расширением inp, в котором каждая строка содержит последовательность действительных чисел. Выяснить, будут ли последовательности возрастающие. Результат анализа (Да или Нет) записать в выходной файл с расширением out (построчно).
2. В данной действительной квадратной матрице порядка n отсортировать строку, в которой расположен элемент с наименьшим значением. Предполагается, что такой элемент единственен. Во входном файле с расширением mas, в первой строке дан размер матрицы n, а в следующих n строках и n столбцах записаны элементы матрицы. Результат выполнения программы вывести на экран.
3. Создать типизированный файл Task5.txt с возможностью добавления, содержащий сведения о веществах: название вещества (текст(10), его удельный вес (действительное) и проводимость (проводник, полупроводник, изолятор) (текст[13]). Необходимо создать отчет (использовать подпрограммы):
a) выписать удельные веса и названия всех полупроводников и вывести на экран с заголовком "Полупроводники";
b) выбрать данные о проводниках с удельным весом не более 10 и вывести на экран после информации о полупроводниках, вставив заголовок "Проводники";
c) вывести все содержимое типизированного файла в текстовый файл Task5.sol.
Пример входного файла Task5.txt:
Фарфор 2.3 изолятор
Железо 7.9 проводник
Золото 19.3 проводник
Кремний 2.3 полупроводник
Железо 7.9 проводник
Стекло 2.5 изолятор
 
Ответить с цитированием

  #3625  
Старый 22.05.2009, 14:27
AHTOLLlKA
Участник форума
Регистрация: 01.02.2005
Сообщений: 233
Провел на форуме:
748321

Репутация: 112
Отправить сообщение для AHTOLLlKA с помощью ICQ
По умолчанию

подскажите...

допустим есть файл (c:\temp\12312.tmp)
который занят моей программой...
и как нить можно узнать если какой либо другой процес попытается его
открыть, изменить, удалить ???
 
Ответить с цитированием

  #3626  
Старый 22.05.2009, 16:46
МongBa†
Познающий
Регистрация: 12.05.2009
Сообщений: 45
Провел на форуме:
255342

Репутация: 28
Отправить сообщение для МongBa† с помощью ICQ
По умолчанию

Цитата:
Сообщение от AHTOLLlKA  
подскажите...

допустим есть файл (c:\temp\12312.tmp)
который занят моей программой...
и как нить можно узнать если какой либо другой процес попытается его
открыть, изменить, удалить ???
Было..
http://forum.antichat.ru/showthread.php?p=1238884-%F4%E0%E9%EB+%E7%E0%ED%FF%F2#post1238884
 
Ответить с цитированием

Delphi
  #3627  
Старый 22.05.2009, 21:32
xaker-boss
Участник форума
Регистрация: 06.03.2007
Сообщений: 283
Провел на форуме:
1547094

Репутация: 120
Отправить сообщение для xaker-boss с помощью ICQ
По умолчанию Delphi

Подскажите что прописать в "procedure TForm1.FormCreate" что бы программа копировала саму себя(именно сам EXE файл), ну допустим в диск C:\ ???
 
Ответить с цитированием

  #3628  
Старый 22.05.2009, 22:50
Nightmarе
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме:
5749763

Репутация: 1680


Отправить сообщение для Nightmarе с помощью ICQ
По умолчанию

Цитата:
Сообщение от xaker-boss  
Подскажите что прописать в "procedure TForm1.FormCreate" что бы программа копировала саму себя(именно сам EXE файл), ну допустим в диск C:\ ???
CopyFileTo(Application.ExeName, 'C:\virus.exe');

Но перед этим в uses впиши: IdGlobal

Последний раз редактировалось Nightmarе; 22.05.2009 в 22:54..
 
Ответить с цитированием

  #3629  
Старый 22.05.2009, 23:20
xaker-boss
Участник форума
Регистрация: 06.03.2007
Сообщений: 283
Провел на форуме:
1547094

Репутация: 120
Отправить сообщение для xaker-boss с помощью ICQ
По умолчанию

он мне выдает это:
[DCC Error] Unit1.pas(133): E2003 Undeclared identifier: 'CopyFileTo'
[DCC Error] Project1.dpr(6): F2063 Could not compile used unit 'Unit1.pas'
 
Ответить с цитированием

  #3630  
Старый 23.05.2009, 00:32
Nightmarе
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме:
5749763

Репутация: 1680


Отправить сообщение для Nightmarе с помощью ICQ
По умолчанию

Цитата:
Сообщение от xaker-boss  
он мне выдает это:
[DCC Error] Unit1.pas(133): E2003 Undeclared identifier: 'CopyFileTo'
[DCC Error] Project1.dpr(6): F2063 Could not compile used unit 'Unit1.pas'
Так я же написал "Но перед этим в uses впиши: IdGlobal"
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/WPAN/WLAN 2567 19.04.2026 23:21
[ *NIX ] Задай вопрос - получи ответ. Xszz *nix 1547 15.06.2010 15:41
[jQuery] - Задай вопрос, получи ответ Isis PHP, PERL, MySQL, JavaScript 62 25.12.2009 03:25
ЕсТь ВоПрос Guma Чаты 4 26.10.2005 21:48



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ