ImageEn for Delphi and C++ Builder ImageEn for Delphi and C++ Builder

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 UserComment

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

View 
UserName:
Password:
Format  Bold Italicized Underline  Align Left Centered Align Right  Horizontal Rule  Insert Hyperlink   Browse for an image to attach to your post Browse for a zip to attach to your post Insert Code  Insert Quote Insert List
   
Message 

 

Emoji
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Black Eye [B)]
Frown [:(] Shocked [:0] Angry [:(!] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
Check here to subscribe to this topic.
   

T O P I C    R E V I E W
matthias schlegel Posted - Oct 15 2013 : 07:27:57
Hello Team Imageen,

i use Delphi 7 and Imageen 5 with the exif-Demo.
After load a picture in StringGrid1.cells[1,42] i see the
value:

GCM_TAG 4029807182852

My routine is:

procedure TMainForm.Button3Click(Sender: TObject);
begin
edit1.text:=StringGrid1.cells[1,42]; //UserComment
end;


the edit1.text value is only GCM_TAG
i nead GCM_TAG 4029807182852

Thank's for help
4   L A T E S T    R E P L I E S    (Newest First)
matthias schlegel Posted - Oct 17 2013 : 02:29:31
Hello Nigel,

now it work's fine.

Thank's for the help.

Matthias Schlegel
xequte Posted - Oct 16 2013 : 21:13:06
Hi

Actually I just checked your file. If you examine it at runtime in the IDE you will see that it contains null characters (#0).

Try this:

function RemoveNullCharacters(const s: String): string;
var
  i: Integer;
begin
  Result := s;
  i := 1;
  while i < Length(Result) do
    if Result[i] = #0 then
      Delete(Result, i, 1)
    else
      Inc(i);
end;

procedure TMainForm.ImageEnView1Click(Sender: TObject);
begin
  Edit1.text := RemoveNullCharacters(StringGrid1.Cells[1, 42]);
end;


Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
matthias schlegel Posted - Oct 16 2013 : 03:40:40
Hello Team Imageen,

i can't find any unreadible characters?

Thank's for help

Matthias Schlegel
xequte Posted - Oct 16 2013 : 02:15:25
Hi

You trace the code and examine the value of StringGrid1.cells[1,42] in the IDE.

Does it contain any unreadible characters? (e.g. #13 or #10)



Nigel
Xequte Software
www.xequte.com
nigel@xequte.com