Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 27.02.2011, 15:17   #41
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию

Stilet, это весь код!
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума
Старый 27.02.2011, 15:49   #42
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Правда? И он компилируется? Запускается?
Если это так то мне в программировании делать нечего...
I'm learning to live...
Stilet вне форума
Старый 27.02.2011, 16:55   #43
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию

SORRY!!! подправил! вот
Вложения
Тип файла: rar project.rar (3.5 Кб, 5 просмотров)
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума
Старый 27.02.2011, 17:06   #44
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Вот теперь другое дело )
Теперь следующая проблема - где в твоем коде вызывается RegHotKey?
Она нигде не вызывается, значит и горклавиша никак не регистрируется.

P.S. Откуда же я знать могу где и как она должна регится...
I'm learning to live...
Stilet вне форума
Старый 27.02.2011, 17:19   #45
KWN, lnc
Delphi 7
Форумчанин
 
Аватар для KWN, lnc
 
Регистрация: 10.02.2009
Сообщений: 354
По умолчанию

Код:
procedure TForm1.HotKeyLinkShow;
var
 i,j: integer;
 Hotkey,s:string;
 ini:Tinifile;
begin
ini := Tinifile.Create('c:\file.ini');
j := ini.ReadInteger('Number','1',1);

for i := 1 to j do
 begin
 s := ini.ReadString('Address', IntToStr(i), '');
 Hotkey := ini.ReadString('Promptness keys', IntToStr(i), '');
 if (s <> '') and (hotkey <> '') then
  begin
  ListView1.Items.Insert(i-1).Caption := s;
  ListView1.Items.Item[i-1].SubItems.Insert(0, Hotkey);
  ListView1.Items.Item[i-1].ImageIndex := 28;
  RegHotKey(TextToHotKey(HotKey, LOCALIZED_KEYNAMES), i-2);
  end;
 end;
end;
Дайте мне власть и я переверну ваш мир!...
KWN, lnc вне форума
Старый 27.02.2011, 18:39   #46
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Во-первых: Я тебя просил выложить весь проект целиком (в архиве) а не по кусочкам. Продолжая проявлять неуважение ты проигнорировал мою просьбу.
Во-вторых:
Цитата:
Delivery to the following recipient failed permanently:

KWNightcrawler@mail.ru

Technical details of permanent failure:
Google tried to deliver your message, but it was rejected by the recipient domain. We recommend contacting the other email provider for further information about the cause of this error. The error that the other server returned was: 550 550 Message was not accepted -- invalid mailbox. Local mailbox kwnightcrawler@mail.ru is unavailable: user not found (state 18).
Твоя почта недоступна.

Удачи в проекте. Учитывая что он секретнее секретов Пентагона тему закрываю, чтоб шпионы не выведали твои тайны по захвату мира.
I'm learning to live...
Stilet вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как сделать так чтобы ... Ромка-12 Помощь студентам 2 16.09.2010 05:52
Как сделать так чтобы.. Дима я Общие вопросы Delphi 2 05.01.2010 19:03
Как сделать так чтобы дружбан начал... VintProg Свободное общение 31 22.08.2009 10:51
Как в Битриксе сделать так, чтобы mulatka Помощь студентам 0 09.06.2009 22:36
Как сделать так чтобы dBCOMBOBOX...... Gareevbo Общие вопросы Delphi 1 08.06.2009 19:59