Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.03.09;
Скачать: [xml.tar.bz2];

Вниз

строки....   Найти похожие ветки 

 
ketmar ©   (2008-02-12 01:41) [40]

>[31] Игорь Шевченко © (2008-02-12 00:45:00)
тогда сначала научи, как добиться этого при помощи программного переключения раскладок. и чтобы юзер при сём не нервничал.


>[37] antonn © (2008-02-12 01:28:00)
я так рад, что ты обо мне много знаешь. можно, я тебе пожалуюсь? соседи постоянно в стену стучат: им мой скрип зубов по ночам спать мешает. я уже три вставных челюсти сточил, да…

я так полагаю, ты плевать хотел на m$, и денег у тебя больше, чем у них? я за тебя рад.
если не больше — не вякай глупости, а?

---
Understanding is not required. Only obedience.


 
Германн ©   (2008-02-12 01:42) [41]


> antonn ©   (12.02.08 01:32) [39]
>
>
> > Германн ©   (12.02.08 01:31) [38]
> >
> >
> > > antonn ©   (12.02.08 01:28) [37]
> >
> > Иногда лучше жевать.
>
> Вот и я ему говорю.
>

Сначала посмотри в зеркало и скажи тому, кого в нём увидишь. Скажи ему несколько раз, пока тот, кто в зеркале, наконец-то поймет.


 
antonn ©   (2008-02-12 01:46) [42]


> я так полагаю, ты плевать хотел на m$, и денег у тебя больше,
>  чем у них? я за тебя рад.
> если не больше — не вякай глупости, а?

не имею склонности к подсчету чужих денег :) Потому что завидовать - дурно.


> Германн ©   (12.02.08 01:42) [41]
>
> Сначала посмотри в зеркало и скажи тому, кого в нём увидишь.
>  Скажи ему несколько раз, пока тот, кто в зеркале, наконец-
> то поймет.

форум портит, я теперь тоже хочу вякать везде где можно, и желательно не в тему, и с направленной агрессией :)


 
{RASkov} ©   (2008-02-12 01:51) [43]

> [36] Steep   (12.02.08 01:23)

Проще WM_COPY "поймать" нежели кнопки отслеживать, тем более что можно скопировать и "мышой" и другими сочетаниями "кнопок"....


 
Steep   (2008-02-12 01:51) [44]

насчет клипборда...

допустим используем код

function SetClipboardText( const AText: string ): Boolean;
var
 h:THandle;
begin
 Clipboard.Open;
 Clipboard.AsText := AText;
 h := Clipboard.GetAsHandle(CF_TEXT);
 SetClipboardData(CF_LOCALE, h);
 Clipboard.Close;
end;


и затем SetClipboardText( MemoZpt.Text );

все работает
НО если пишем использовать эту процедуру на клавиши Ctr+C

procedure TFrm_Text.MemoZptKeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
if (Shift = [ssCtrl]) and (Key = ord("C")) then
 begin
   SetClipboardText( TMemo(sender).selText );
 end;
end;


то нифига не работает - как я понял винда использует свои методы...
а на наши плюет...
то есть нужно либо полностью перекрывать... либо... либо что-то другое....
...
все мои мозги на сегодня получули - хорошую тряску....
пойду я спать - время у меня уже 4 утра.....
всем удачного времени суток...  а я уже сплю...


 
ketmar ©   (2008-02-12 01:53) [45]

>[42] antonn © (2008-02-12 01:46:00)
>не имею склонности к подсчету чужих денег

да? так ты ещё и наглый врун.

[37]: «именно поэтому микрософт продает, зарабатывает и имеет бОльшую аудиторию, а ты сидишь в какой нибудь консоли и скрипишь зубами от зависти»

внимательно прочитаю обоснование причин, по которым эту фразу можно понять не как: «ты лузер, и бабла как m$ не зашибаешь (да ваще тебе еле на лекарства хватает!), сидишь где-то в мухосранске; вот начни зашибать как m$ (ну, или как я хотя бы) — тогда и говори что-то».

сливы и отмазы не прокатят. или признай, что ты лжец, или обоснуй свои слова.

---
Understanding is not required. Only obedience.


 
Steep   (2008-02-12 01:54) [46]


> Проще WM_COPY "поймать" нежели кнопки отслеживать, тем более
> что можно скопировать и "мышой" и другими сочетаниями "кнопок".
> ...

хм... ладно еще минута мышления не повредит...
насколько я понимаю - это отлов сообщения от ОС - только вот с сообщениями я не работал...
нужно поискать будет как их ловить :)
но все это завтра! точнее сегодня но днем... все спать спать!


 
Германн ©   (2008-02-12 01:59) [47]


> antonn ©   (12.02.08 01:46) [42]
>
> > Германн ©   (12.02.08 01:42) [41]
> >
> > Сначала посмотри в зеркало и скажи тому, кого в нём увидишь.
>
> >  Скажи ему несколько раз, пока тот, кто в зеркале, наконец-
>
> > то поймет.
>
> форум портит, я теперь тоже хочу вякать везде где можно,
>  и желательно не в тему, и с направленной агрессией :)
>

Форум "портит" лишь тех, кто изначально склонен к "вяканию" и к агресии, И ещё тех, кто склонен к неприятию возражений. И при этом не силён в тематике форума.


 
antonn ©   (2008-02-12 02:05) [48]

ладно, идем другом путем - а если юниксовый файл загрузить в мемо, оно #13 добавит?
а если это не мемо?


 
{RASkov} ©   (2008-02-12 02:14) [49]

> [46] Steep   (12.02.08 01:54)

Попробуй вот, примерно, так:

в описании формы
  ......
 private
   OldWnd: TWndMethod;
   procedure NewWnd(var Mes: TMessage);
   ...........


procedure{function} SetClipboardText( const AText: string ){: Boolean};
var
 h:THandle;
begin
 Clipboard.Open;
 Clipboard.AsText := AText;
 h := Clipboard.GetAsHandle(CF_TEXT);
 SetClipboardData(CF_LOCALE, h);
 Clipboard.Close;
end;

procedure TForm.FormCreate();
begin
 OldWnd:=Memo.WindowProc;
 Memo.WindowProc:=NewWnd;
end;

procedure TForm.NewWnd(var Mes: TMessage);
begin
 if Mes.Msg=WM_COPY then SetClipboardText(Memo.SelText) else OldWnd(Mes);
end;


 
Германн ©   (2008-02-12 02:31) [50]


> antonn ©   (12.02.08 02:05) [48]
>
> ладно, идем другом путем - а если юниксовый файл загрузить
> в мемо, оно #13 добавит?
>

А "оно" обязано? "Оно" где-то, когда-то, что-то обещало?


 
Anatoly Podgoretsky ©   (2008-02-12 08:35) [51]

> Steep  (11.02.2008 23:58:16)  [16]

> вроде после #13 (вроде ентер ) может идти #10 (символ каретки вроде как), а наоборот я не уверен

Наоборот - называется хакерская.

V   V
| o |

Для новых русских


 
Anatoly Podgoretsky ©   (2008-02-12 08:37) [52]

> {RASkov}  (12.02.2008 00:02:18)  [18]

Ты тоже хакер или иезуит-одиночка.


 
Steep   (2008-02-12 09:09) [53]

Спасибо всем большое за помощь!!!
Особенно:
> Игорь Шевченко ©
> {RASkov} ©


 
Игорь Шевченко ©   (2008-02-12 09:43) [54]

{RASkov} ©   (12.02.08 02:14) [49]

Это мы все умеем для одной формы. Когда их несколько тысяч, готовых, уже уметь перестаем. Когда совокупное количество проблемных контролов (из которых надо копировать) переваливает за десятки тысяч, руки просто опускаются. Я надеялся, что ketmar подскажет способ, как добавить unit в проект, вызвать его initialization автомагически и весь русский текст будет копироваться в юникодные окна без проблем.


 
ketmar ©   (2008-02-12 12:55) [55]

>[54] Игорь Шевченко © (2008-02-12 09:43:00)
тю. хучим CreateWindowEx, сабклассим формы. в чём проблема-то?

опять же — кто мешает пропатчить VMT на предмет InitInstance(), и в ней вешать обработчиками хоть чертей лысых?

трудно? да. реализуемо? да. магически? да.

подсказал?

---
Understanding is not required. Only obedience.


 
Игорь Шевченко ©   (2008-02-12 12:59) [56]

ketmar ©   (12.02.08 12:55) [55]

Я-то думал, ты знаешь. А туда же.

Я б тебе ответил фразой из старого анекдота, но правила :)
С IE бороться у тебя интереснее получается.


 
ketmar ©   (2008-02-12 13:37) [57]

>[56] Игорь Шевченко © (2008-02-12 12:59:00)
>Я-то думал, ты знаешь. А туда же.

а в чём проблема моих решения? они нереализуемы? реализуемы, и причём именно так, как ты сказал — достаточно будет написать uses SuperUnicodePatcher;. где мной не соблюдено заданное тобой условие? за скромную сумму в полторы тысячи американских денег я готов тебе это даже написать. 30$ предоплата, 30% после альфа-версии, 40% после сдачи. и ещё две тысячи за исходники.

---
Understanding is not required. Only obedience.


 
ketmar ©   (2008-02-12 13:38) [58]

>30$ предоплата
30% предоплата, конечно. %-))

---
Understanding is not required. Only obedience.


 
ketmar ©   (2008-02-12 13:39) [59]

ах, да. срок сдачи релиз — полтора месяца от получения первых 30%.

---
Understanding is not required. Only obedience.


 
Игорь Шевченко ©   (2008-02-12 14:28) [60]

ketmar ©   (12.02.08 13:37) [57]


> а в чём проблема моих решения? они нереализуемы? реализуемы,
>  и причём именно так, как ты сказал — достаточно будет написать
> uses SuperUnicodePatcher;. где мной не соблюдено заданное
> тобой условие? за скромную сумму в полторы тысячи американских
> денег я готов тебе это даже написать


> ах, да. срок сдачи релиз — полтора месяца от получения первых
> 30%.


Тебе не кажется, что это несколько не совмещается с твоей фразой из поста [29]


> мне вот интересно, почему 99.9% вопрошающих про «кракозяблы в
> буфере обмена» никогда не задумываются, какое именно магическое
> действие совершает переключение раскладки, и как можно добиться того
> же, но раскладку не дёргать?


Я повторю - флеймить про IE у тебя гораздо лучше получается.


 
ketmar ©   (2008-02-12 14:37) [61]

>[60] Игорь Шевченко © (2008-02-12 14:28:00)
отчего же? совмещается. никаких разногласий не вижу. лично я вполне в курсе, откуда берётся этот эффект и как его решать. и точно так же, как в курсе — так мне на это и наплевать, у моих заказчиков не было неанглийских раскладок. для себя чинил когда-то в home-made проектах, но там и VCL никакой не светилось (хотя использовались *A-варианты функций). а сейчас мне вообще по-барабану, что там в винде через как сделано, потому и цену накатил большую: есть другая работа, но лично для тебя, как проявление уважения, готов от неё отвлечься; чтобы окупить простой — пришлось цену задрать.

---
Understanding is not required. Only obedience.


 
{RASkov} ©   (2008-02-12 14:40) [62]

> [52] Anatoly Podgoretsky ©   (12.02.08 08:37)
> иезуит

А это кто? ...или что


 
Anatoly Podgoretsky ©   (2008-02-12 20:50) [63]

> {RASkov}  (12.02.2008 14:40:02)  [62]

Если я тебе скажу, то ты или испугаешься, или обидишся.
Но я тебе скажу волшебное слово - гугл.


 
{RASkov} ©   (2008-02-12 22:03) [64]

> [63] Anatoly Podgoretsky ©   (12.02.08 20:50)
> Если я тебе скажу, то ты или испугаешься, или обидишся.

Да вот еще... :)

> Но я тебе скажу волшебное слово - гугл.

Сегодня число иезуитов составляет 19 216 человек (данные 2007 года), из них 13 491 священников.
Фикасе.... их всех в лицо знают :)


 
Anatoly Podgoretsky ©   (2008-02-12 22:37) [65]

> {RASkov}  (12.02.2008 22:03:04)  [64]

Конечно, все переписаны



Страницы: 1 2 вся ветка

Форум: "Начинающим";
Текущий архив: 2008.03.09;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.58 MB
Время: 0.044 c
4-1184547973
AlexanderMS
2007-07-16 05:06
2008.03.09
Рисование с изменённой палитрой.


4-1184068039
Инс
2007-07-10 15:47
2008.03.09
fs:


2-1202743828
vegarulez
2008-02-11 18:30
2008.03.09
Вопрос про передачу PGP Sign посредством IdHTTP(Indy10)


15-1200650677
capkoh
2008-01-18 13:04
2008.03.09
Оценка качества кода


6-1181044210
WebSQLNeederr
2007-06-05 15:50
2008.03.09
Програмно кликнуть на ссылку из ТВебБровзера





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский