Conversion for Delphi 2009 unicode issue -

-

I am converting a link from Delphi 7 to Delphi 2009. I found this error: E2010 Incompatible Type: 'Four' and 'Anscher' How can I fix this? I tried to declare the alphabet: Ansistring failed on [AlphabetLength]. 

  const alphabet = 64; Alphabet: String [Alphabet Langghi] = 'ABCDEFGHHLMNOPQRTUVXbackDDFGILMNAPCrustWoxix 0123456789 +/'; Function TBase64.ValueToCharacter (value: byte; var character: char): boolean; Start the result: = true; If (value> alphabet lang -1) result: = false else // compilation error E2010 incompatible type: 'four' and 'AnsiChar' characters: = alphabet (value + 1); End; Function TBase64.CharacterToValue (character: char; var value: byte): boolean; Start the result: = true; Value: = status (character, alphabet); If value = 0 then results: = wrong other value: = value -1; End; Avoid using the excluded shortstring type in Unicode Delphi versions (2009 and later):  

  const alphabet = 64; Alphabet = 'ABCDFGHISHLMNOPQRTUVWXAzBackDFGILMNPCrustWoxix 0123456789 +/';

The above changes must be sufficient. You should also consider changing 2-byte characters from 1-Byte AnsiChars.

Edit (Jeroen Plumeir):

Here.


Comments

Post a Comment

Popular posts from this blog

oracle - The fastest way to check if some records in a database table? -

-
I have a big table to work with. I have to see that there are some records whose parent_id is equal to my passing value. Currently I do this by implementing "my_table using select count (*) where parent_id =: id"; If the result> 0, it means that they exist. Because this is a very large table, and I do not care what the actual number of records present, I just want to know if it exists, so I think count (*) Bit is disabled. How do I apply this requirement most quickly? I'm using Oracle 10. # Tips for Hibernation & amp; Tricks It suggests writing in such a way: Integer number = (integer) session .createQuery ("Select Count (*) to ...."). UniqueResult (); I do not know what is the magic of the unique rule? Why does it fast? To compare, select "1 from mytable where parent_id = passId and rowrum", which is more efficient? If you are not interested in the number of records, then there is an EXISTS query one: Select 'y'
Read more

php - multilevel menu with multilevel array -

-
Just ask someone to solve this problem? I want to create a multilevel menu I can not find the right solution generated with multilevel array, it always gets an array_push error My study came from the original idea But still my Can not match the need. This is my MySQL [code] ----- --------------------- --------------- | ID | PARENT_ID | Name | Link | Seq | 1 | 0 | Dashboad | Dashboard / | 1 | 2 | 0 | Menu 1 | Menu 1 / | 2 | 3 | 0 | Menu 2 | Menu 2 / | 3 | 4 | 0 | Menu 3 | Menu 3 / | 4 | 5 | 2 | Joint Add / | 1 | 6 | 3 | Joint Add / | 1 | 7 | 2 | Edit | Edit / | 2 | 8 | 4 | Joint Add / | 1 ------------------------------------------ [/ Code] I want to do something like this in my array array ('dashboard' = & gt; array ('id' = & gt; '' 'Dame' = & gt; 'Dashboard', 'Title' = & gt; 'Dashboard', 'MatchMin' = & gt; Base_URL (). 'Dashboard /', 'Active' => = & Gt; NULL), &
Read more

jQuery UI: Datepicker month format -

-
I am trying to change the format of the month that shows in the popup (not in the date that the picker actually I do not have any choice anywhere to do this, do I like to use a sub-string () or something else? What I normally display is Trying to change: Class = "ui-datepicker-title"> January & lt; / span & gt; ... & lt; / div & gt; Div>
Read more