Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как получить права администратора? [D5, Win2k, WinXP]


Страницы:   1 2

TankMan ©   (2004-10-30 21:13:00) 

Ну не могу я найти ничего :(.. задался опять своим вопросом, как получить программе права текущего пользователя? И еще дополнительный вопрос - не могу понять почему в tEdit в Вин2к, заранее скопированный текст содержащий русские и английские символы, вставляется не корректно, а именно - русские буквы в превращаются/отображаются знаками вопроса :(


TankMan   (2004-11-15 06:30:00) [1]

>>NAlexey ©   (12.11.04 15:54) [28]
...На вопрос - "Может подскажешь чего?"...
А как еще спросить информацию которую я не могу найти?

>>Alex_Petr ©   (12.11.04 16:05) [29]
Я так понимаю это для открытия директории компонент? А мне нужно открыть файл...

Я не понимаю почему ни кто не может ответить? - это слишком тривиальный вопрос, чтобы на него отвечать, или ни у кого проблемы как таковой не возникало?


Alex_Petr   (2004-11-12 16:05:00) [2]

>например OpenDialog-а, я не могу попасть на сетевые ресурсы, >которые разрешены только администратору
Попробуй использовать SHBrowseForFolder.
С ним у меня все получается


NAlexey   (2004-11-12 15:54:00) [3]

>TankMan ©   (12.11.04 14:49) [27]
Здесь не принято отвечать на такие вопросы.


TankMan   (2004-11-12 14:49:00) [4]

Тык в том то и дело что я не могу найти :( я сдесь тему создал не сразу как у меня проблема появилась... я сначало искал, но не нашел :(... может подскажешь чего?


NAlexey   (2004-11-12 10:56:00) [5]

>TankMan ©   (12.11.04 09:10) [25]
Ну так а в чем проблема то? Полно на этот счет инфы в инете...


TankMan   (2004-11-12 09:10:00) [6]

...Я тут подумал подумал... - взглянул на название темы и понял/вспомнил... а ведь меня так и не пускает в сеть через openDialog программы :( - говорит прав не достаточно :(


TankMan   (2004-11-12 09:03:00) [7]

>>Liavik  
С этим у меня все "нормально" - Английская винда с MUI :)...

>>NAlexey
Спасибо большое - помогло - все нормально работает! Еще раз спасибо!


Liavik   (2004-11-11 12:34:00) [8]

Проверь в настройках язык и региональные стандарты


NAlexey   (2004-11-11 12:02:00) [9]

>TankMan ©   (11.11.04 11:36) [21]
Не думаю что надо каждый раз менять эти ключи в реестре, на мой взгляд это общая проблема винды. Делается раз для всей машины и не меняется потом. Поищи в инете на этот счет.


TankMan   (2004-11-11 11:36:00) [10]

>>NAlexey
Она у меня весит в трее сама, после перезагрузки запустилась :)
Да и действительно заработало :) так погоди, у меня вопрос - при запуске программы я должен запускать ThereClick а при выходе BackClick? А почему у меня сразу не сработало это? Т.е. получается что для нормальной работы должен быть всегда случай ThereClick, а если я выполню BackClick и выйду из программы то на следующий раз мне нужно будет запустить программу 2 раза? т.е. первый раз выполнится ThereClick и мне нужно будет перезапустить программу?...


NAlexey   (2004-11-11 08:41:00) [11]

Все нормально работает, скопируй снова после того как изменил ключи в реестре, и перезапусти программу в которую вставляешь, вообщем зайди и снова выйди. Пытливее надо быть пытливее.


TankMan   (2004-11-11 07:41:00) [12]

>>NAlexey
А не работает :(((
Самое обидное что ведь вставляю в проэкт - вижу ??? ????? vot icon-??.. а в коммандную строку Total-а (и что ж я так к нему приципился ? :) )...вижу - Вот такой vot icon-ка
Может как-то буфер нужно обрабатывать? Или еще чего?


NAlexey   (2004-11-10 09:58:00) [13]

>TankMan ©   (10.11.04 09:14) [17]
Я тебе могу помочь, но только по второму вопросу:

const
 FKey = '\SYSTEM\CurrentControlSet\Control\Nls\CodePage';

procedure TForm1.ThereClick(Sender: TObject);
var
 Reg: TRegistry;
begin
 Reg := TRegistry.Create;
 try
   Reg.RootKey := HKEY_LOCAL_MACHINE;
   Reg.OpenKey(FKey, False);
   Reg.WriteString('1250', 'c_1251.nls');
   Reg.WriteString('1251', 'c_1251.nls');
   Reg.WriteString('1252', 'c_1251.nls');
   Reg.WriteString('1253', 'c_1251.nls');
   Reg.WriteString('1254', 'c_1251.nls');
   Reg.WriteString('1255', 'c_1251.nls');
 finally
   Reg.Free;
 end;
end;

procedure TForm1.BackClick(Sender: TObject);
var
 Reg: TRegistry;
begin
 Reg := TRegistry.Create;
 try
   Reg.RootKey := HKEY_LOCAL_MACHINE;
   Reg.OpenKey(FKey, False);
   Reg.WriteString('1250', 'c_1250.nls');
   Reg.WriteString('1251', 'c_1251.nls');
   Reg.WriteString('1252', 'c_1252.nls');
   Reg.WriteString('1253', 'c_1253.nls');
   Reg.WriteString('1254', 'c_1254.nls');
   Reg.WriteString('1255', 'c_1255.nls');
 finally
   Reg.Free;
 end;
end;


TankMan   (2004-11-10 09:14:00) [14]

>>Cobalt
Ой а я уже это несколько раз кажется говорил...
>>MacroDenS
Да я и так админ :)
А вот через мою прожку в сеть попать не могу :( не понимаю я фишки, самое интересное что мне никто не ответил на этот вопрос....
>>kaZaNoVa
Интересно... %)


kaZaNoVa   (2004-11-05 15:26:00) [15]

MacroDenS ©   (05.11.04 15:10) [15]
супер !!!


MacroDenS   (2004-11-05 15:10:00) [16]

или добиться увольнения старого админа и залесть на его место, правда это чревато последствиями...


kaZaNoVa   (2004-11-05 15:04:00) [17]

MacroDenS ©   (05.11.04 15:02) [13]
ага, переустановка системы рулит :)


MacroDenS   (2004-11-05 15:02:00) [18]


Как получить права администратора

Стать администратором!


Cobalt   (2004-11-05 14:33:00) [19]

2 TankMan ©   (05.11.04 11:48) [7]
На русскую раскладку надо переключаться перед копированием, а не перед вставкой.


kaZaNoVa   (2004-11-05 13:48:00) [20]

TankMan ©   (05.11.04 12:33) [10]
Dll'ку либо цепляешься через ShellDelayLoad, либо CreateRemoteThread к Explorer, как бонус получаешь невидимость в процессах .. (шучу %))


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо