Несколько вопросов по Delphi 2005

[Квэнди]

Line := Perform(EM_LINEFROMCHAR, SelStart, 0);

[Albenous]

Line := Perform(EM_LINEFROMCHAR, SelStart, 0);

Интересная шука, надо будет использовать.

[Nez]

Квэнди, это что такое и с чем ето едят? Что такое Line - integer?

[Квэнди]

В процедуре onclick в memo :
var
line:integer;
begin
та строчка
end;

Line будет номером строки по которой щелкнули

Уточню:
procedure TForm4.Memo1Click(Sender: TObject);
var
Line: Integer;
begin
with (Sender as TMemo) do
Line := Perform(EM_LINEFROMCHAR, SelStart, 0);
end;

[Nez]

Квэнди, огромное спасибо... Что бы я без тебя делал? Это ты сам придумал?

Вот ещё вопрос, есть какой-нибудь способ сделать так, чтобы нельзя было другими программами (ArtMoney например) посмотреть куда обращается моя прога (в частности с какими файлами она работает )?

[Квэнди]

Напрямую нет, если только маскируй:
создавай параллельный процесс с другим названием и работай с фалйами из другого процесса

[Speeker]

Сообщение от Nez

Вот ещё вопрос, есть какой-нибудь способ сделать так, чтобы нельзя было другими программами (ArtMoney например) посмотреть куда обращается моя прога (в частности с какими файлами она работает )?

Идеальной защиты ты не сделаешь, но предлагаю просто написать процес, который будет закрывать окна самых популярных таких програм как REGMON, FileMON, artmoney,...

[Nez]

Speeker, ну да... так я вобщем-то и планировал (а иначе вы думаете я зачем спрашивал как определить запущена ли та или иная программа ), вот только закрываться будет не "плохая" программа, а моя.. От чего всем будет очень плохо

Вот только не могли бы вы мне написать хотябы несколько самых широкоизвестных и используемых программ для этого дела и какое название у этих программ висит в заголовке окна?

[Speeker]

Основные я тебе написал поройся в нете - найдешь, зайди на пару крякерских сайтов и т.д., а то у меня ща только Regmon присутствует.
з.ы.
только антивирь включи

[Nez]

А в заголовке так и написано REGMON, FileMON, artmoney? Так заглавные/строчные буквы не имеют значения при проверке?

И ещё, просто забыл, как все букву перевести в верхний/нижний регистр?