> cara menginisalisaisi kayak apa ?, sori soalnya benar� blank nih
Salah satu dari fungsi alokasi memori. Tergantung pada si PWideChar itu
nantinya mau diapakan. Contoh berikut menggunakan fungsi standar GetMem():
var
P: PWideChar;
s: string;
begin
...
GetMem(P, sizeof(WideChar) * Succ(Length(s)));
StringToWideChar(s, P, Succ(Length(s)));
// do something with P
FreeMem(P);
end;
Selanjutnya dibawah adalah potongan dari berbagai alternatif yang sudah saya
sebutkan sebelumnya.
// dengan static buffer
var
P: array[0..511] of WideChar;
begin
StringToWideChar(s, @P[0], sizeof(P) div sizeof(WideChar));
// do something with P
end;
// dengan StringToOleStr()
var
P: PWideChar;
begin
P := StringToOleStr(s);
// do something with P
SysFreeString(P); // -> you'll need ActiveX unit for this (at least in D5)
end;
// dengan 'bantuan' WideString type variable
var
W: WideString;
P: PWideChar;
begin
W := s; // variabel WideString dan Longstring bisa saling
// tukar menukar value. Compiler magic.
P := PWideChar(W);
// do something with P
end;
> menggunakan ini "Hasil" sudah ada isinya cuman setelah itu program
> langsung ilegal operation,
Ngomong-ngomong, si Hasil ini dibuat apa sih? Di mana exception muncul?
Anda sedang ber-OLE ria?
> nah klo pake SysfreeString ini klo g salah ada di unit System,
Yang di unit System visibility-nya hanya dalam scope unit itu sendiri.
Gunakan unit ActiveX.
> waktu uses unit System malah
Unit System tidak perlu diikutkan dalam uses clause. Delphi akan selalu
mengikutkan unit itu di tiap unit (sudah used secara implisit.)
Salam
hans
--
--
+++ GMX - Mail, Messaging & more http://www.gmx.net +++
NEU: Mit GMX ins Internet. Rund um die Uhr f�r 1 ct/ Min. surfen!
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Get 128 Bit SSL Encryption!
http://us.click.yahoo.com/CBxunD/vN2EAA/xGHJAA/i7folB/TM
---------------------------------------------------------------------~->
Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
