Find Jobs
Hire Freelancers

Conversion of code from Delphi to VB(repost)

$30-5000 USD

Cancelled
Posted over 16 years ago

$30-5000 USD

Paid on delivery
I now have the Delphi code that reads clicks on the screen (xy points) and builds a series of traingles that make up a TIN or Triangular Irregular Network. I need this code converted to 3 VB subroutines, ideally as a new class. The code I have includes the testing program, and everything works very well - flawless even. The Delphi code is very poorly written and a bit hard to figure out how it works - but it does. NOTE: See more notes below. I need the Delphi code converted into the following subroutines in VB: **SUB LoadPoints(x as double, y as double, z as double, ClearArrayFirst as Boolean)** - This allows me to load any number of xyz points into a list or array of any size. This should be very easy. I will supply a CSV file containing a list of xyz points for testing. **SUB BuildTin()** - Takes the above array of xyz points and define a series of adjacent triangles that makes a TIN and stores 3 sets of xyz points that defines every trinagle of the TIN. Such a TIN can represent the ground surface of a building lot. All this has been figured out in the Delphi code. The test program should graph the TIN or we can supply the specs for a file that will allow us to check the results. **SUB DefineOuterLimits()** - Scans the triangles that make up the TIN and return a polygon consisting of xyz points that define the outer limit of the TIN. This subroutine is not critical so need not be included. We would like it however. Delphi Code is attached, try the EXE file and click 4 or more times on the screen to see how it works. ## Deliverables 1) Complete and fully-functional set of 3 subroutines along with a test program that demonstrates that these subroutines work. Want complete source code of all work done. 2) Deliverables must be in ready-to-run condition, as follows (depending on the nature of the deliverables): a) Subroutines are to be used in software we are developing - that software is not a part of this contrace. 3) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement). ## Platform Delevered code must be written in VB 8.0 and ideally delivered as a class but 3 subroutines are acceptable. Windows XP operating system. NOTE: The point Structure probably will look like this: Public Structure XYPoint Private m_x As Double Private m_y As Double Private m_z As Double Public Property X() As Double Get Return m_x End Get Set(ByVal value As Double) m_x = value End Set End Property Public Property Y() As Double Get Return m_y End Get Set(ByVal value As Double) m_y = value End Set End Property Public Property Z() As Double Get Return m_z End Get Set(ByVal value As Double) m_z = value End Set End Property Public Sub New(ByVal dx As Double, ByVal dy As Double, ByVal dz as Double) X = dx Y = dy Z = dz End Sub End Structure
Project ID: 3576053

About the project

2 proposals
Remote project
Active 16 yrs ago

Looking to make some money?

Benefits of bidding on Freelancer

Set your budget and timeframe
Get paid for your work
Outline your proposal
It's free to sign up and bid on jobs
2 freelancers are bidding on average $425 USD for this job
User Avatar
See private message.
$255 USD in 30 days
0.0 (3 reviews)
0.0
0.0
User Avatar
See private message.
$595 USD in 30 days
0.0 (0 reviews)
0.0
0.0

About the client

Flag of UNITED STATES
United States
0.0
0
Member since Dec 19, 2007

Client Verification

Thanks! We’ve emailed you a link to claim your free credit.
Something went wrong while sending your email. Please try again.
Registered Users Total Jobs Posted
Freelancer ® is a registered Trademark of Freelancer Technology Pty Limited (ACN 142 189 759)
Copyright © 2024 Freelancer Technology Pty Limited (ACN 142 189 759)
Loading preview
Permission granted for Geolocation.
Your login session has expired and you have been logged out. Please log in again.