информационная безопасность без паники и всерьез  подробно о проекте
			Анализ криптографических сетевых...   Модель надежности двухузлового...   Специальные марковские модели надежности...   Очередное исследование 19 миллиардов...   Оптимизация ввода-вывода как инструмент...   Зловреды выбирают Lisp и Delphi
	главная обзор RSN блог библиотека закон бред форум dnet о проекте
	bugtraq.ru / форум / programming		Имя Пароль

	если вы видите этот текст, отключите в настройках форума использование JavaScript

ФОРУМ
	все доски
	FAQ
	IRC
	новые сообщения
	site updates
	guestbook
	beginners
	sysadmin
	programming
operating systems
theory
web building
software
hardware
networking
law
hacking
gadgets
job
dnet
humor
miscellaneous
scrap
регистрация

Легенда:   новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение

• Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
• Новичкам также крайне полезно ознакомиться с данным документом.

	Хммм... чё то я не понял... 06.12.01 19:01  Число просмотров: 1125 Автор: PS <PS> Статус: Elderman <"чистая" ссылка>
	По ссыдке не ходил, но приведенный код явно не паскалевский. Или теперь C называют паскалем ? :) Если у тебя уже есть работающий код, то надо создать один диалог, с одной кнопкой, и под нее положить этот код.
	<programming>

Delphi: Очень простой вопрос и оч. срочно 06.12.01 18:53    Штраф: 30 [Biasha, Бяша, :-)] Автор: Mikhail Статус: Незарегистрированный пользователь <"чистая" ссылка>

Помогите, пожалуйста, создать программу! На Паскале я бы сделал это в минуту, но в Delphi я полный чайник. Есть (как я понял) кусок программы. Но этого достаточно. Есть Delphi 4. Расскажите, пожалуйста, что нужно сделать от самого запуска языка до компиллирования. Вот тот кусок (http://delfaq.wallst.ru/cgi-bin/site_mngr/show.pl?29): Q> Как зашутдаунить удаленный компьютер? A> int main(int argc, char **argv) { HANDLE hToken; TOKEN_PRIVILEGES tkp; //------------------- char *name=""; // address of name of computer to shut down char *msg=""; //address of message to display in dialog box DWORD time=0; // time to display dialog box bool force=true; // force applications with unsaved changes flag bool reboot=true; //reboot flag //--------------------------------------------------------------------- OpenProcessToken(GetCurrentProcess(),TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY, &hToken); if(!LookupPrivilegeValue(name, SE_SHUTDOWN_NAME,&tkp.Privileges[0].Luid)){ printf ("SE_SHUTDOWN_NAME Privilege облом \n"); return 1 ;}; tkp.PrivilegeCount =1; tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED; AdjustTokenPrivileges(hToken, FALSE, &tkp, 0,(PTOKEN_PRIVILEGES)NULL, 0); if(!LookupPrivilegeValue(name, SE_REMOTE_SHUTDOWN_NAME,&tkp.Privileges[0].Luid)){ printf("SE_REMOTE_SHUTDOWN_NAME Privilege облом \n"); return 2 ;}; tkp.PrivilegeCount =1; tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED; AdjustTokenPrivileges(hToken, FALSE, &tkp, 0,(PTOKEN_PRIVILEGES)NULL, 0); if (InitiateSystemShutdown(name,msg,time,force,reboot)) printf("%s shutdown Ok\n",name); else printf("Can't shutdown %s \n",name); return 0; }

	Хммм... чё то я не понял... 06.12.01 19:01   Автор: PS <PS> Статус: Elderman <"чистая" ссылка>
	По ссыдке не ходил, но приведенный код явно не паскалевский. Или теперь C называют паскалем ? :) Если у тебя уже есть работающий код, то надо создать один диалог, с одной кнопкой, и под нее положить этот код.

		Хммм... чё то я не понял... 06.12.01 19:05   Автор: Mikhail Статус: Незарегистрированный пользователь <"чистая" ссылка>
		> По ссыдке не ходил, но приведенный код явно не > паскалевский. Или теперь C называют паскалем ? :) Эта штука по всей видимости на Делфи написана > Если у тебя уже есть работающий код, то надо создать один > диалог, с одной кнопкой, и под нее положить этот код. Пожалуйста, расскажи мне как.

			Как один диалог создать ? Блин, какой Дельфи ?! 06.12.01 19:10   Автор: PS <PS> Статус: Elderman Отредактировано 06.12.01 19:23  Количество правок: 2 <"чистая" ссылка>
			Ну блин, два года как дельфи в глаза не видел :) Видимо, выбираешь проект APPLICATION EXE (или типа того), он уже должен будет одну формочку создать. Навешиваешь на нее кнопк. Двойной клик на кнопке, попадаешь в редактор кода. Переносишь в окошко свой работающий код. Все. На сколько я помнб в паскале есть вложенные ф-ии. Т.ч. должно прокатить нахаляву (если не прав - меня поправят :)) ЗАБУДЬ РЕД: Открывай VC, File/New... Console Application, Empty project... Потом project/Add to project/files/ подцепляй этот файл, компились... и смотри что будет. Может линкер завопит, может нет... дальше сам. Как же ты в паскале разбераешся если Сый код от паскалевского отличить не можешь ?

				Как один диалог создать ? Блин, какой Дельфи ?! 06.12.01 19:59   Автор: Mikhail Статус: Незарегистрированный пользователь <"чистая" ссылка>
				> Как же ты в паскале разбераешся если Сый код от > паскалевского отличить не можешь ? А я разве говорил, что он на Паскале? Я говорил, что он на Делфи, но что там к чему - не знаю. А за остальное спасибо - завтра попробую.

					Как один диалог создать ? Блин, какой Дельфи ?! 07.12.01 01:52   Автор: Korsh <Мельников Михаил> Статус: Elderman <"чистая" ссылка>
					> > Как же ты в паскале разбераешся если Сый код от > > паскалевского отличить не можешь ? > А я разве говорил, что он на Паскале? > Я говорил, что он на Делфи, но что там к чему - не знаю. А тебе не кажется, что Делфи использует именно Паскаль! Это просто Визуальный Паскаль.

1

Copyright © 2001-2025 Dmitry Leonov

Page build time: 0 s

Design: Vadim Derkach