HOME    FORUMS    MEMBERS    RECENT POSTS    LOG IN  
Баннер 1   Баннер 2

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

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Перезагрузить страницу [Delphi]/[Pascal] Задай вопрос, получи ответ
   
Ответ
Страница 467 из 671 « Первая < 367417457 463 464 465 466 467 468 469 470 471 477517567 > Последняя »
 
Опции темы Поиск в этой теме Опции просмотра

  #1  
Старый 27.10.2009, 09:46
lastsmile
Познающий
Регистрация: 22.09.2007
Сообщений: 42
Провел на форуме:
255505

Репутация: 22
По умолчанию
Цитата:
Сообщение от intNet  
rdp.AdvancedSettings2.ClearTextPassword := 'pass';
Или так:
rdp.AdvancedSettings2.Set_ClearTextPassword('pass' );
Про домен - не помню, но помоему rdp.Domain.
пробовал. я такой пример нагуглил. дельфи ругается.
Цитата:
Project Project1.exe raised exception class EOleException with message 'Интерфейс не поддерживается'. Process stopped...
В остальных случаях синтаксическая ошибка. а про домен правильно подсказал.

а вот этот вариант мне понравился:
Цитата:
пуск - выполнить - mstsc /? - enter

там указываешь файл с rdp настройками
осталось с шифрованием пароля разобраться-нагуглил:
Цитата:
Там используется функция CryptProtectData , где не используется "Optional entropy " и "PromptStruct" , а также в качестве "description string" строка в юникоде "psw". Пароль тоже в юникоде дополненный до 512 байт нулевыми байтами.
осталось это реализовать в дельфи, а потом еще сделать обработчик событий. который будет проверять удачно ли я залогинен или нет.
 
Ответить с цитированием

  #2  
Старый 27.10.2009, 21:44
intNet
Познающий
Регистрация: 31.05.2009
Сообщений: 68
Провел на форуме:
1271980

Репутация: 19
По умолчанию
Цитата:
Сообщение от lastsmile  
пробовал. я такой пример нагуглил. дельфи ругается.

В остальных случаях синтаксическая ошибка. а про домен правильно подсказал.
У тебя наверное mstscax.dll версии 5.*. обнови до 6.*, ошибка исчезнет.
 
Ответить с цитированием

  #3  
Старый 27.10.2009, 03:46
wolmer
Постоянный
Регистрация: 12.05.2009
Сообщений: 395
Провел на форуме:
4761503

Репутация: 229
По умолчанию
Такой вопрос...
Вот к примеру есть потоки, они обрабатывают инфу и заносят в мемо, потоки чуть не успевают туда записывать строки (точнее так сказать мемо не резиновый)(совсем чуть чуть не успевает), куда не записанные строки (т.е. ждущие строки пока их запишут) деются? В память я так думаю... А что если эта очередь может разорваться? Т.е. если очередь разорвется то высветится ошибка типа Out of memory? Верно?
 
Ответить с цитированием

  #4  
Старый 27.10.2009, 07:54
DiHWO
Участник форума
Регистрация: 23.10.2009
Сообщений: 103
Провел на форуме:
289669

Репутация: 7
По умолчанию
ответьте про дедики...и пинч что такое?
 
Ответить с цитированием

  #5  
Старый 27.10.2009, 20:03
НTL
Постоянный
Регистрация: 26.01.2008
Сообщений: 796
Провел на форуме:
5209663

Репутация: 357


Отправить сообщение для НTL с помощью ICQ
По умолчанию
Как в строковом параметре отсеять буквы и оставить только цифры?
 
Ответить с цитированием

  #6  
Старый 27.10.2009, 20:15
wolmer
Постоянный
Регистрация: 12.05.2009
Сообщений: 395
Провел на форуме:
4761503

Репутация: 229
По умолчанию
Цитата:
Сообщение от НTL  
Как в строковом параметре отсеять буквы и оставить только цифры?
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
 i:integer;
 s:string;
begin
 for i:=1 to length(edit1.text) do
  begin
    if pos(edit1.text[i],'1234567890')<>0 then
     begin
       s:=s+edit1.text[i];
     end;
  end;

 edit1.text:=s;
end;
 
Ответить с цитированием

  #7  
Старый 27.10.2009, 20:17
[n]-c0der
Участник форума
Регистрация: 03.02.2009
Сообщений: 104
Провел на форуме:
270228

Репутация: 70
По умолчанию
Цитата:
Сообщение от НTL  
Как в строковом параметре отсеять буквы и оставить только цифры?
Создать функцию по отсеиванию - НЕ ВАРИАНТ?
 
Ответить с цитированием

  #8  
Старый 27.10.2009, 21:06
alexey-m
Познающий
Регистрация: 15.07.2009
Сообщений: 71
Провел на форуме:
520157

Репутация: 35
Отправить сообщение для alexey-m с помощью ICQ
По умолчанию
Подскажите пожалуйса, как определить смещение в РЕ файле на таблицу экспорта/импорта, а точнее на имена экспортируемых/импортируемых функции
 
Ответить с цитированием

  #9  
Старый 27.10.2009, 21:09
[n]-c0der
Участник форума
Регистрация: 03.02.2009
Сообщений: 104
Провел на форуме:
270228

Репутация: 70
По умолчанию
Цитата:
Сообщение от alexey-m  
Подскажите пожалуйса, как определить смещение в РЕ файле на таблицу экспорта/импорта, а точнее на имена экспортируемых/импортируемых функции
Для начала надо внимательно почитать о структуре PE файла и таких вопросов не возникнет. -> wasm.ru
 
Ответить с цитированием

  #10  
Старый 27.10.2009, 21:54
Dmitriik750
Познающий
Регистрация: 23.07.2009
Сообщений: 30
Провел на форуме:
257718

Репутация: 11
По умолчанию
как ра знашел что, что искал)
 
Ответить с цитированием
Ответ
Страница 467 из 671 « Первая < 367417457 463 464 465 466 467 468 469 470 471 477517567 > Последняя »



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/Wi-Fi/Wardriving 2568 25.04.2026 12:58
[jQuery] - Задай вопрос, получи ответ Isis PHP 62 25.12.2009 03:25



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


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




ANTICHAT.XYZ