Re: [Comedia-hackers] Project Progress
Status: Alpha
Brought to you by:
seroukhov
|
From: Sergey M. <se...@ma...> - 2002-10-16 20:01:58
|
Hello!
=F7=CF=D0=D2=CF=D3 =C2=D9=CC =CE=C5 =D7 =DC=D4=CF=CD. =F7 =F3=EF=ED =
=C5=D3=D4=D8 =CF=C7=D2=C1=CE=C9=DE=C5=CE=C9=D1 =CE=C1 =
=D0=CF=C4=C4=C5=D2=D6=C9=D7=C1=C5=CD=D9=C5=20
=D4=C9=D0=D9 =C4=C1=CE=CE=D9=C8 =D0=CF =D5=CD=CF=CC=DE=C1=CE=C9=C0. =
=F7 =DE=C1=D3=D4=CE=CF=D3=D4=C9 =F3=EF=ED=CF=D7=D3=CB=C9=CA =D4=C9=D0 =
BSTR=20
=D0=CF=C8=CF=D6=C5 =CD=C1=D0=D0=C9=D2=D5=C5=D4=D3=D1 =CE=C1 =
WideString. =E5=DD=C5 =C5=D3=D4=D8 =D7=C1=D2=C9=C1=CE=D4=D9 =C4=CC=D1 =
=D0=C5=D2=C5=C4=C1=DE=C9
=D3=D4=D2=CF=CB =C9=D3=CB=CC=C0=DE=C1=D1 OleVariant?
=F4=C1=CB=CF=CA =CD=CF=CD=C5=CE=D4 =CE=C5 =DA=CE=C1=C0 =CE=C5 =
=DA=C1=C4=D5=CD=D9=D7=C1=CC=D3=D1.
=E2=D9=D4=D8 =CD=CF=D6=C5=D4 =CE=D5=D6=CE=CF =
=C9=D3=D0=CF=CC=D8=DA=CF=D7=C1=D4=D8 WideString =C4=CC=D1 =
=CF=C6=CF=D2=CD=CC=C5=CE=C9=D1 =D3=D4=D2=CF=CB=CF=D7=D9=C8
=D0=C1=D2=C1=CD=C5=D4=D2=CF=D7 =C9 =
=C9=D3=D0=CF=CC=D8=DA=CF=D7=C1=D4=D8 =
=C2=CF=D2=CC=C1=CE=C4=CF=D7=D3=CB=C9=CA =CD=C5=CE=C5=C4=D6=C5=D2 =
=D0=C1=CD=D1=D4=C9, =DE=D4=CF=C2=D9
=D3=C4=C5=CC=C1=D4=D8 =DC=D4=CF =D3=CF=D7=CD=C5=D3=D4=C9=CD=D9=CD =D3 =
=F3=EF=ED =C8=CF=D4=D1 =C2=D9 =CE=C1 =CE=C1=DE=C1=CC=D8=CE=CF=CD =
=D5=D2=CF=D7=CE=C5..
=F1 =CE=C5 =D0=CF=CD=CE=C0 =CF=C7=D2=C1=CE=C9=DE=C5=CE=C9=D1 =
=CB=CF=D4=CF=D2=D9=C5 =D7=D7=CF=C4=D1=D4=D3=D1 =D0=D2=C9 =
=C9=D3=D0=CF=CC=D8=DA=CF=D7=C1=CE=C9=C9 ShareMem. =EE=CF =
=D0=C5=D2=C5=C4=C1=DE=D5 =CF=C2=DF=C5=CB=D4=CF=D7 =D1 =C4=C5=CC=C1=CC =
=D4=C1=CB:
//app
InitPlugin(integer(Application), integer(Screen));
//dll
procedure InitPlugin(App, Scr: integer); StdCall;
begin
DS :=3D Screen;
Screen :=3D TScreen(Scr);
DA :=3D Application;
Application :=3D TApplication(App);
end;
=F0=D2=C9 =D0=C5=D2=C5=C4=C1=DE=C5 =D3=D4=D2=CF=CB =CD=C5=D6=C4=D5 =
=CD=CF=C4=D5=CC=D1=CD=C9 =CC=D5=DE=DB=C5 =D7=D3=C5=C7=CF =
=C9=D3=D0=CF=CC=D8=DA=CF=D7=C1=D4=D8 pchar(string) =C9=CC=C9 =
=C5=D3=CC=C9 =D0=CF=D4=D2=C5=C2=D5=C5=D4=D3=D1 pwidechar(widestring).
=EE=C1=D3=CB=CF=CC=D8=CB=CF =CD=CE=C5 =D0=CF=CD=CE=C9=D4=D3=D1 =D0=D2=C9 =
=C9=D3=D0=CF=CC=D8=DA=CF=D7=C1=CE=C9=C9 WideString =CD=CE=C5 =
=D0=D2=C9=C8=CF=C4=CC=CF=D3=D8 =C4=C5=CC=C1=D4=D8 =D4=C1=CB=CF=CA =
=D7=C1=D2=C9=C1=CE=D4 =D3=CD. =CE=C9=D6=C5 =C9=CE=C1=DE=C5 =
=D0=CF=CC=D5=DE=C1=CC=D3=D1 =CE=C5 "=D0=D2=C1=D7=C9=CC=D8=CE=D9=CA" =
PChar.=20
var
srt: WideString
str1: string;
begin
str1 :=3D String(str); =20
PChar(str1);
=C5=D3=CC=C9 =C4=C5=CC=C1=D4=D8 =D4=C1=CB:
PChar(str);
=D4=CF =D0=CF=CC=D5=DE=C1=C5=CD =CD=C1=D3=D3=C9=D7 =
=D2=C1=D7=CE=D9=CA 2*=CB=CF=CC =D3=C9=CD=D7=CF=CC=CF=D7;
=EE=C1 =D4=C1=CB=C9=C8 =D0=D2=C9=CB=CF=CC=C1=C8 =CD=CF=D6=CE=CF =
=CC=C5=C7=CB=CF =D0=CF=D0=C1=D3=D4=D8=D3=D1. Widestring =
=CE=CF=D2=CD=C1=CC=D8=CE=CF =D2=C1=C2=CF=D4=C1=C5=D4 =D4=CF=CC=D8=CB=CF =
=D7 NT =D7 95 =D0=CF=CC=CE=CF =DA=C1=C7=CC=D5=DB=C5=CB =C9 =
=C2=C1=C7=CF=D7. =E8=CF=D4=D8 Delphi =D3=C1=CD=C1 =C4=C5=CC=C1=C5=D4 =
=D0=D2=C5=CF=C2=D2=C1=DA=CF=D7=C1=CE=C9=C5 widestring to string =C9 =
=CE=C1=CF=C2=CF=D2=CF=D4, =D1 =D7 =C7=D2=CF=C2=D5 =D7=C9=C4=C5=CC =
=D4=C1=CB=C9=C5 =D0=D2=C5=CF=C2=D2=C1=DA=CF=D7=C1=CE=C9=D1 =D7 =
=D2=C5=DA=D5=CC=D8=D4=C1=D4=C5 =CC=C5=C7=CB=CF=C7=CF =
=C4=D7=C9=D6=C5=CE=C9=D1 =D2=D5=CB=C9 =C2=D2=C0=CB=C9 =
=D0=D2=C5=D7=D2=C1=DD=C1=C0=D4=D3=D1, =
=D0=D2=C5=D7=D2=C1=DD=C1=C0=D4=D3=D1 =C2=D2=C0=CB=C9....=20
=F1 =CE=C5 =CF=C4=CF=C2=D2=D1=C0 =C9=D3=D0=CF=CC=D8=DA=CF=D7=C1=CE=C9=D1 =
widestring =C2=C5=DA =CF=D3=CF=C2=CF=CA =
=CE=C5=CF=C2=C8=CF=C4=C9=CD=CF=D3=D4=C9. =FE=C5=D2=D4 =D3 =
=DC=D4=C9=CD=C9 =CB=C9=D4=C1=CA=C3=C1=CD=C9 =C9 =C9=C8 =
=C2=CF=CC=D8=DB=C9=CD =C1=CC=C6=C1=D7=C9=D4=CF=CD.=20
=E4=CC=D1 =D3=CF=D7=CD=C5=D3=D4=C9=CD=CF=D3=D4=C9 =D3 COM =D1 =
=D0=CF=CC=D8=DA=D5=C0=D3=D8 StringToOleStr OleStrToString. =
=F7=CF=CF=C2=DD=C5 =D0=D2=C9 =C9=D3=D0=CF=CC=D8=DA=CF=D7=C1=CE=C9=C9 COM =
=D2=C1=D3=D0=D2=C5=C4=C5=CC=C5=CE=C9=C5=CD =D0=C1=CD=D1=D4=C9 =C4=CC=D1 =
widestring =DA=C1=CE=C9=CD=C1=C5=D4=D3=D1 OLE, =D0=D2=C9=DE=C5=CD =
=C4=C5=CC=C1=C5=D4 =DC=D4=CF =CE=C5=DA=C1=D7=C9=D3=C9=CD=CF =CF=D4 =
=CD=CF=C4=D5=CC=D1, =C9=DA =CB=CF=D4=CF=D2=CF=C7=CF =C2=D9=CC=C1 =
=D3=CF=DA=C4=C1=CE=C1 =D3=D4=D2=CF=CB=C1.=20
~ Sergey Merkuriev |