Sim. Mas porque usar trocar tudo pra Ansi?
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Eduardo Silva dos Santos Sent: Thursday, October 23, 2008 4:36 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Delphi 2009 e Unicode.. Ok Andreano, então pra VCL/RTL a diretiva Unicode já está definida na ide... entendi.. como não vou usar Unicode, devo declarar minhas variáveis String como AnsiString e pChar como PAnsiChar ? está correto? vou usar o Grep Search do GExperts, que em alguns segundos troca tudo pra mim... 2008/10/22 Andreano Lanusse <[EMAIL PROTECTED]<mailto:andreano.lanusse%40codegear.com>> > Você pode usar diretiva, assim como está no código abaixo. > > Esse é o exemplo de código que usa API direto, mas no caso da VCL/RTL isso > já está definido. > > ________________________________________ > From: delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br> > <delphi-br%40yahoogrupos.com.br> [ > delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br> > <delphi-br%40yahoogrupos.com.br>] On Behalf > Of Eduardo Silva dos Santos [EMAIL > PROTECTED]<mailto:eduardo.drd%40gmail.com><eduardo.drd%40gmail.com> > ] > Sent: Wednesday, October 22, 2008 5:07 PM > To: delphi-br@yahoogrupos.com.br<mailto:delphi-br%40yahoogrupos.com.br> > <delphi-br%40yahoogrupos.com.br>; > Andreano Lanusse > Subject: [delphi-br] Delphi 2009 e Unicode.. > > > Olá Andreano e pessoal da lista, estou fazendo alguns testes no Delphi 2009 > e dando uma olha da unit sysUtils eu vi o seguinte... > > {$IFDEF MSWINDOWS} > procedure InitDriveSpacePtr; > var > Kernel: THandle; > begin > Kernel := GetModuleHandle(Windows.Kernel32); > if Kernel <> 0 then > *{$IFDEF UNICODE}* > @GetDiskFreeSpaceEx := GetProcAddress(Kernel, 'GetDiskFreeSpaceExW'); > {$ELSE} > @GetDiskFreeSpaceEx := GetProcAddress(Kernel, 'GetDiskFreeSpaceExA'); > {$ENDIF} > if not Assigned(GetDiskFreeSpaceEx) then > GetDiskFreeSpaceEx := @BackfillGetDiskFreeSpaceEx; > end; > {$ENDIF} > > é possível eu definir ou não a diretiva UNICODE, afim de manter a > compatibilidade e não precisar modificar o código do meu software? > > -- > ....................................................... > Eduardo Silva dos Santos > DRD SISTEMAS > (27) 3218-4201 > (27) 8842-9489 > MSN: [EMAIL PROTECTED]<mailto:eduardo.drd%40gmail.com> > <eduardo.drd%40gmail.com><mailto: > eduardo.drd%40gmail.com <eduardo.drd%2540gmail.com>> > Site: http://www.drdsistemas.com.br/ > ....................................................... > > [As partes desta mensagem que não continham texto foram removidas] > > CONFIDENTIALITY NOTICE: This email message is for the sole use of the > intended recipient(s) > and may contain confidential and privileged information. Any unauthorized > review, use, > disclosure or distribution is prohibited. If you are not the intended > recipient, please > contact the sender by reply email and destroy all copies of the original > message. > > > -- ....................................................... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: [EMAIL PROTECTED]<mailto:eduardo.drd%40gmail.com> Site: http://www.drdsistemas.com.br/ ....................................................... [As partes desta mensagem que não continham texto foram removidas] CONFIDENTIALITY NOTICE: This email message is for the sole use of the intended recipient(s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply email and destroy all copies of the original message. [As partes desta mensagem que não continham texto foram removidas]