delphi - D2009 problems with array of char - how can I `elegantly` fix my code? -


Going through some of its old Delphi projects, upgrading them to D 2009, as I make this version a great improvement Generic.Collection - Wow !;) For all previous releases, I have to face various problems. This one I managed to solve, but the solution does not look elegant in half as I believe it can be. (Note, I have not written the Delphi code for about three years and even the back thing is that amateur hacking is not enough to understand in depth the depth of what is happening.)

< P> There will be a TFileStream in my code and read from it. The files were first written by my old Delphi app in such a way that the first three characters in the file will be valid as CTR because the file type is valid, the reader will be read in an array of characters in the first three bytes (and here's the problem, now this size (Four) is 2 bytes) and then to see this array as a string, see if it reads 'CTR'. 

  var ... buffer: Sir's [0..2] sir; Start ... inStream.read (buffer, 3); If Buffer & lt; & Gt; Start 'CTR' then ShowMessage ('Not a valid file!'); Go out; End; ...

It will compile and used to work, but now the buffer is about 6 bytes long and therefore 'CTR' is not equal to ever .

I fixed the buffer by changing the array [0..2] byte to and I started some more local variables to do the following:

The buffer for 
  is s: = s + chr (b); // Notice for..in Loop is now available in D2009 if S & lt; & Gt; 'CTR' ...

So basically I change the individual byte to a string and then compare it, but there should be a more simple way to do this. Will you put some light on this issue?

You can set your buffer

var buffer: unsecured Array of [0..2];

And you'll read in the same thing as before.


Comments

Post a Comment

Popular posts from this blog

python - Overriding the save method in Django ModelForm -

I'm having trouble overriding a ModelForm save method. I get this error I'm: Exception type: TypeErier Exception Value: Save () found an unexpected keyword argument 'committed' My intentions include a form 3 fields Submit several values ​​for, then create an object for each combination of those areas, and to save each object file models.py class collarsult type (models.Model): id = model. AutoField (db_column = 'icontact_result_code_type_id', primary_key = true) callResult = models.ForeignKey ( 'CallResult', db_column = 'icontact_result_code_id') campaign = models.ForeignKey ( 'campaign', db_column = 'icampaign_id') CALLTYPE = models.ForeignKey ( 'CALLTYPE', db_column = 'icall_type_id') agent = models.BooleanField (db_column = 'bagent', default = true) teamLeader = models.BooleanField (db_column = 'bTeamLeader', default = true) active = models.BooleanField (db_column = Django.form...
Read more

html - CSS autoheight, but fit content to height of div -

I have a div in which there are three children- div in the left and middle div: float: left while true: float: true because it is my layout Actually will spoil, I've used ClearFix Hack: .cf {zoom: 1; }. Cf: First,. Cf: {content: ""; Display: Table; }. Cf: After {clear: both; } It still works, but I want to be the right div an indicator. So it should fill 100% of the parent unit of height. How can I complete this? PS is the full code: & Lt; / Div & gt; & Lt; Div class = "mobile_content" & gt; & Lt; H5 & gt; {{Data.titel}} & lt; / H5> & Lt; Table & gt; & Lt; TR & gt; & Lt; Th & gt; Komponist: & lt; / Th & gt; & Lt; TD & gt; {{Data.komponist}} & lt; / TD & gt; & Lt; / TR & gt; & Lt; TR & gt; & Lt; Th & gt; Instrument: & lt; / Th & gt; & Lt; TD & gt; {{Data.instrumente}} & lt; / TD & gt; & Lt; / TR & gt;...
Read more

qt - How to prevent QAudioInput from automatically boosting the master volume to 100%? -

I have been trying to use Qt5 multimedia to record audio with QAudioInput, however, when I see If QAudioInput is started, it increases the master volume of my sound device to 100%. How can I prevent QAudioInput from changing the master volume? My current development platform is Linux with PalsAdio (with flat audio disabled). How can I use QAudioInput : QAudioDeviceInfo device_info = QAudioDeviceInfo :: defaultInputDevice (); QAudio format format; Format.setSampleRate (44100); Format.setChannelCount (1); Format.setSampleSize (16); Format.setCodec ("Audio / PCM"); Format.setSampleType (QAudioFormat :: SignedInt); Format.setByteOrder (QAudioFormat :: LittleEndian); Std :: cout & lt; & Lt; Device_info.deviceName (). ToUtf8 (). ConstData () & lt; & Lt; Std :: endl; QAudioInput * default_device = new QAudioInput (device_info, format); QIODevice * default_io_device = default_device-> Start (); a QAudioInput.setVolume () method is not you I ...
Read more