Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Модераторы, помогите найти тему!!! Что-то через поиск не идет! 
:(
    Опции темы
Nicholas
  Дата 25.1.2005, 05:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 436
Регистрация: 30.9.2004

Репутация: нет
Всего: 0



Не помню точно о чем, но там, что-то про создание вот таких штук говрилось: {59031a47-3f72-44a7-89c5-5595fe6b30ee}.????????

Кстати, максимум неделю назад видел!
PM MAIL ICQ   Вверх
Alex
Дата 25.1.2005, 08:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 6
Всего: 162



А тебе для чего это нужно?


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
Snowy
Дата 25.1.2005, 09:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



delshared.reg
Цитата

Windows Registry Editor Version 5.00

;  убрать папку Shared Documents из My Computer
[-HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\DelegateFolders\{59031a47-3f72-44a7-89c5-5595fe6b30ee}]

Ну а что собственно говоря интересовало-то?

Это сообщение отредактировал(а) Snowy - 25.1.2005, 09:05
PM MAIL   Вверх
p0s0l
Дата 25.1.2005, 11:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 14
Всего: 112



CreateGuid из SysUtils.pas

Типа:
Код

uses SysUtils;

var
 G : TGUID;
begin
 CreateGuid (G);
 Caption := GuidToString(G);
end;



--------------------
С уважением, г-н Посол.
PM   Вверх
Nicholas
Дата 25.1.2005, 13:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 436
Регистрация: 30.9.2004

Репутация: нет
Всего: 0



Мне казалось, что строку в такой вид можно перевести и обратно, ну типа зашифровать.

Наверно не на этом форуме...
PM MAIL ICQ   Вверх
p0s0l
Дата 25.1.2005, 13:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 14
Всего: 112



Может про MD5 говоришь ?... Только там обратно нельзя преобразовать однозначно... Если так, то ищи "шифрование", "хэширование"...
Или же просто в шестнадцатиричный вид надо преобразовать строку ?

Добавлено @ 13:24
Может ты про это ?
http://forum.vingrad.ru/index.php?showtopic=40274


--------------------
С уважением, г-н Посол.
PM   Вверх
Nicholas
Дата 14.2.2005, 12:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 436
Регистрация: 30.9.2004

Репутация: нет
Всего: 0



Цитата(p0s0l @ 25.1.2005, 13:21)
Или же просто в шестнадцатиричный вид надо преобразовать строку ?


Как выполнить преобразование в Hex и обратно?
smile

Что-то я стандартных функций типо IntToHex не нашел.
PM MAIL ICQ   Вверх
Snowy
Дата 14.2.2005, 18:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



В HEX: IntToHex;
Обратно: StrToInt;
PM MAIL   Вверх
Nicholas
Дата 15.2.2005, 07:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 436
Регистрация: 30.9.2004

Репутация: нет
Всего: 0



Цитата(Snowy @ 14.2.2005, 18:07)
Обратно: StrToInt;

Еслиб все так просто было, а если строка очень длинная, то преобразование в Int не получиться!!!
PM MAIL ICQ   Вверх
Snowy
Дата 15.2.2005, 08:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



Нарезай на части, конверть, а потом перемножай.
PM MAIL   Вверх
Alex
Дата 15.2.2005, 09:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 6
Всего: 162



Поиск по форуму виликая вещь. http://forum.vingrad.ru/index.php?showtopi...ndpost&p=288583

Код

function HexToStr(hex: String): String;
var
 t: Integer;
begin
 Result:= '';
 if Length(hex) = 0 then Exit;
 with TStringList.Create do try
   Text:= AnsiReplaceText(hex, '%', ^M^J + '$');
   Delete(0);
   for t := 0 to Count - 1 do
     Result:= Result + Chr(StrToInt(Strings[t]));
 finally
   Free;
 end;
end;

procedure TfrmMain.Button4Click(Sender: TObject);
begin
 ShowMessage(HexToStr('%E0'));
end;



Добавлено @ 09:04
http://vingrad.ru/DELPHI-DLP-000213


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
Nicholas
Дата 15.2.2005, 12:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 436
Регистрация: 30.9.2004

Репутация: нет
Всего: 0



Цитата(Alex @ 15.2.2005, 09:02)
Поиск по форуму виликая вещь.


Это точно, только вот почему прежде чем я на нем что-то нахожу - успеваю свой код набросать! smile


Интересная процедура, а в моей переменных больше, и при этом нет счетчиков (!),буду проверять, может собственная работает лучше! smile

Это сообщение отредактировал(а) Nicholas - 15.2.2005, 13:01
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




[ Время генерации скрипта: 0.0571 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.