Solved

Follow Up: Indy | Records, and Typecasts

Posted on 2004-07-30
4
188 Views
Last Modified: 2010-04-05
Hello there,
This Q is a Follow up of http:Q_21063476.html

I tried to add a field to the TLoginSizes and as soon as I did it the compiler stopped at "TLoginSizes(mr.DataLen).UsernameLen:=Length(Edit1.Text);" with the message "invalid typecast"

type
  TLoginSizes = record
    UsernameLen: Word;
    PasswordLen: Word;
    HexArraylen: Word;     //    New field...
  end;

  TMsgRec = record
    RecType: Byte;
    Command: Byte;
    DataLen: Cardinal;
  end;
0
Comment
Question by:Cerf
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
4 Comments
 
LVL 8

Author Comment

by:Cerf
ID: 11681700
This Q has turned into "extremely urgent" for me... Raising to 500p
0
 
LVL 8

Author Comment

by:Cerf
ID: 11681866
I see what you wrote previously,

>"it's a kindof an optimization .. I only send one record and the data once with an existing record type
DataLen is a cardinal field - 4 bytes
that TLoginSizes record has two word fields - 2x 2bytes
so the datasize is the same and using that typecast it can represent various things
if you take a look at TRect you'll see a similar thing"

and I guess it is about  the size of cardinal and 3 word fields = 6bytes but I don't really understand what are you doing there...
0
 
LVL 17

Accepted Solution

by:
Wim ten Brink earned 500 total points
ID: 11685451
Use packed records...

TLoginSizes and TMsgRec might appear to be only 6 bytes byt don't have to be, just because the way Delphi aligns these fields. It's not a very safe typecast anyway and will be invalid in future Delphi versions so you better not use it. PErhaps a variant record is a better option. Example:

type
  TYourRecord = record
    case boolean of
      False: (RecType: Byte; Command: Byte; DataLen: Cardinal);
      True: (UsernameLen: Word; PasswordLen: Word; HexArraylen: Word);     //    New field...    
  end;

Or something similar. I don't have Delphi available right now so can't check...

If you're using global variables, you might also think of using the 'absolute' keyword:

var
  LoginSizes: TLoginSizes;
  MsgRec: TMsgRec absolute LoginSizes;

As a final solution, consider using pointers.
0
 
LVL 8

Author Comment

by:Cerf
ID: 11686428
Thanks Alex!

I already fixed it changing a bit the comm protocol between the server and the clients to a simplier thing. As a friend told me...
"KISS" keep it simple, stupid :) so I did and works fine.
I only send the header record (TMsgRec) which is fixed size for sure and don't do any typecasting... the rest is interpreted and manipulated by the server. However, your post makes sense.

Thanks for interesting,

Cërf.

0

Featured Post

On Demand Webinar - Networking for the Cloud Era

This webinar discusses:
-Common barriers companies experience when moving to the cloud
-How SD-WAN changes the way we look at networks
-Best practices customers should employ moving forward with cloud migration
-What happens behind the scenes of SteelConnect’s one-click button

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Delphi selector screen 2 97
Downloading email attachments 2 94
Graphics32 under Delphi 10.1 Berlin 2 173
Drag & Drop... Data from one grid to another 2 53
A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
In a recent question (https://www.experts-exchange.com/questions/29004105/Run-AutoHotkey-script-directly-from-Notepad.html) here at Experts Exchange, a member asked how to run an AutoHotkey script (.AHK) directly from Notepad++ (aka NPP). This video…

737 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question