Yahoo messenger connection problem

Манай байгууллага yahoo messenger-ийг орохыг нь болиулчихлаа. Надад ямар нэгэн аргаар yahoo messenger -т орох боломж байгаа болов уу? энэ тухай мэддэг чаддаг хүн байвал надад туслаач. Ямар нэгэн proxy ч юмуу?
Read more...

PostMessage - ийг баахан ухлаа

Өнөөдөр би ажил дээрээ Delphi - гийн sendmessage-ийг ашиглаад өөр нэг application-руу давхар товчны хослол илгээх гээд баахан ухлаа. Интернэт гэдэг их ахаасаа ч бас баахан шалгаалаа. Ер чадсангүй шүү. Яг юу хийх гээд байсан маань гэвэл notepad-руу CTRL+A гэсэн товч дарагдлаа гэсэн мессэж илгээх гээд л байсан юм. Үүнийг хийж байсан хүн байвал надад нэг тус болооч. Сүүлдээ бүр боломжгүй мэт санагдаад явчихлаа. Өөрийнхөө кодын зарим хэсгийг та бүхэнд үзүүлье.



procedure TForm1.Button2Click(Sender: TObject);
var a: TKeyboardState; h: Cardinal;
begin
h:=FindWindow('notepad', nil);
GetKeyboardState(a);
a[VK_CONTROL]:=128;
SetKeyboardState(a);
PostMessage(h, WM_KEYDOWN, 17, 1900545);
PostMessage(h, WM_KEYDOWN, 65, 1966081);
PostMessage(h, WM_KEYUP, 65, 1966081);
PostMessage(h, WM_KEYUP, 17, 1900545);
Application.ProcessMessages;
GetKeyboardState(a);
a[VK_CONTROL]:=$1;
SetKeyboardState(a);
end;
Read more...

Блогт маань тавтай морил!

Энэхүү блог маань мэрэгжил нэгт нөхдөд маань бага ч гэсэн тус болох болтугай.
Read more...