Показать сообщение отдельно
  #5  
Старый 19.07.2011, 15:13
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

почти все получилось
со свойствами сделал так:
PHP код:
ini.define('main''form-x''100'TProp.Create(Form1'left'));
ini.define('main''form-y''100'TProp.Create(Form1'top')); 
ещё велосипед с регистрацией типов файлов в реестре прикрутил
PHP код:
result := TRegAssoc.Create('txt');
result.defineIcon(Application.ExeName);
result.defineDefaultCommand('open');
result.defineCommand('open''open me!'Application.ExeName);
result.defineCommand('edit''edit me!''notepad'); 
PHP код:
if not result.check then
begin
  result
.write
  sys_upd
;
end
во вложении текст если интересно
Вложения
Тип файла: zip reg.zip (9.0 Кбайт, 9 просмотров)
Ответить с цитированием