Solved

In need of components

Posted on 2006-11-20
22
176 Views
Last Modified: 2010-04-05
Hi,

I'll start with the background.
We have an application built in delphi at work which bassicly makes excel-reports from a data-file and the emails it to specified email-adress. The stupid thing is that the email-adress is hardcoded in the program and we wish to change the email-adress now.

I've gotten ahold of the source-code to the program (he who made it for 2-3 years ago has quit the company) and started to look into and noticed that he use some external components. One of theese componets was quite easy to find by using google (It's called FlexCel), but another one im having abit of trouble with finding.  It's only called "TextFile" so its quite hard to google for.

Do anyone have any idea's of what I can do?

Best Regards,
Jonas
0
Comment
Question by:jonasbson
  • 5
  • 5
  • 3
  • +4
22 Comments
 
LVL 45

Expert Comment

by:aikimark
ID: 17980835
0
 
LVL 9

Expert Comment

by:bernani
ID: 17981001
Hi,

It's maybe this one http://www.tmssoftware.com/flexcel.htm

0
 

Author Comment

by:jonasbson
ID: 17981353
aikirnark:
Yes im sure its not the textfile reserverd word becaouse its decalered as a unit in "uses".

bernani:

That component I've allready downloaded, as stated in my first post.
0
 
LVL 45

Expert Comment

by:aikimark
ID: 17981640
@jonasbson

Are there any comments in the unit that might clue us to its origin?

How about posting some code snippets illustrating the textfile methods and properties.
0
 
LVL 28

Expert Comment

by:TName
ID: 17981996
Hi,
Where there's TextFile in the uses clause, there could be a TTextFile and a TextFile.pas...
Could it be this one (just gooled for both terms):

http://0xc0de.org/source/TTextfile/?C=S;O=A 
0
 
LVL 28

Expert Comment

by:TName
ID: 17982008
gooled = googled
0
 

Author Comment

by:jonasbson
ID: 17982025
aikimark:

Sorry to say there isnt much comments in code (remember im not the origin coder so dont blame me :D)..

Here is a code snippets illustrating some use of textfile:

 With TTextfile.Create Do
   Try
    FixedColumns := False;
    Separator := ';';
    Filename := HastusFile;
    Start;
    If Fields[1] = 'UID' Then
     Begin
      Username := Trim(Fields[3]);
      Statistics.Period := Trim(Fields[4]) + ' - ' + Trim(Fields[5]);
     End
    Else
     Begin
      AlertForUnexpectedEOF;
      Exit;
     End;
    LogFile := Trim(Temporary_Path) + '\Production_' + Username + '_' +
     FormatDateTime('yyyy-mm-dd_hh.nn.ss', FunctionStarted) + '.log';
    While (Trim(Fields[1]) <> '*SCHEDULES*') And (Not EOF) Do Next;
    If EOF Then
     Begin
      AlertForUnexpectedEOF;
      Exit;
     End;
0
 

Author Comment

by:jonasbson
ID: 17982044
@Tname

I've actually tried that one and it wasnt the right one :/.

0
 
LVL 28

Expert Comment

by:TName
ID: 17982105
Yes, I've just noticed...
0
 
LVL 6

Expert Comment

by:wimmeyvaert
ID: 17985571
Are you sure it isn't a unit your ex-collegue has made himself.
I searched the web for TTextFile Separator, but nothing found.

Maybe you can search your disk for TextFile.pas or TextFile.dcu

Best regards,

The Mayor.
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 

Author Comment

by:jonasbson
ID: 17985703
@wimmeyvaert

It's possible that my ex-colleague made it himself. I've only recieved one folder from his ex-pc with the sourcecode in and there is no textfile.pas or .dcu in that one.

I wounder if there is someway to "de-compile" the .exe and that way extract TextFile.pas or .dcu. Anyone know?

Regards,

Jonas
0
 
LVL 6

Expert Comment

by:wimmeyvaert
ID: 17986442
Maybe you ca ntry following link :
http://delphi.about.com/od/devutilities/a/decompiling_3.htm

On this page there are some tools to decompile or do reverse engineering.
Never tried this.

Best regards,

The Mayor.
0
 
LVL 9

Expert Comment

by:bernani
ID: 17986586
Hi,

Maybe you coud also have a loot at the topics present on this forum: http://community.reverse-engineering.net/index.php

Eventually, register and ask also your question there.

From the  Introduction and Welcome page:
"Welcome to the Reverse Code Engineering board. It is designed to be a place where reverse code engineers and software protectors are able to discuss - free of nonsense and ignorance.
Please read the rules as they were designed to protect members from illegal actions and bad manners. In order to post, you have to register first.
The board is designed to be friendly and not threatening members who start with reverse code engineering and software protection. Managed by experienced professional programmers and reverse code engineers / software protectors who understand that learning something like RCE is not easy, even if you are very experienced in programming and coding."
....

I'm not member. Can't say if it's worth or not.  


0
 
LVL 45

Expert Comment

by:aikimark
ID: 17987982
@Jonas,

I thnk we may be able to help you recreate your missing unit.  You should probably increase the points on this question if you go this route.

The recreation of this unit will require you to post all code references to that unit in order for us to determine the methods and properties.  There is an EE upload area ((EE Stuff) that you might use if there is a large amount of source code.
0
 

Author Comment

by:jonasbson
ID: 17995853
@aikimark

That would be a possibility. I will wait till next week cause then I will get a cd-rom disk with data from my ex-colleuge's PC. Hopefully the unit will be on it.

I've also looked into decompilers but it doesnt look like any of them are able to extract used unit.
0
 
LVL 6

Expert Comment

by:wimmeyvaert
ID: 18100340
Any success so far ?
0
 
LVL 45

Expert Comment

by:aikimark
ID: 21110304
I recommend PAQ with no points refunded.
0
 
LVL 28

Expert Comment

by:2266180
ID: 21110343
if reverse engineering is something that is ok from EE point of view, then I almost agree :) since the asker did not answer the last question, it means that the asker abandoned the question and as per EE rules, he cannot get his points refunded.

That was the only reason why I suggested a delete, so .. it's up to the moderators now ;)

So, if the reverse engineering stuff is ok, then my suggestion is PAQ no refund. Otherwise, delete no refund.

0
 
LVL 45

Expert Comment

by:aikimark
ID: 21110404
@ciuly

I recommended NO points refunded.
0
 
LVL 28

Expert Comment

by:2266180
ID: 21110444
right. sorry. right now I do 3 things in the same time, one of which is cleanup and answer here. my brain/eyes must have glitched :)
0
 
LVL 1

Accepted Solution

by:
Computer101 earned 0 total points
ID: 21135806
PAQed with no points refunded (of 125)

Computer101
EE Admin
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

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

Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
Migrating to Microsoft Office 365 is becoming increasingly popular for organizations both large and small. If you have made the leap to Microsoft’s cloud platform, you know that you will need to create a corporate email signature for your Office 365…
Internet Business Fax to Email Made Easy - With  eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, f…

920 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

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now