What is the equivalent code in c#?

[Milad Biroonvand]

What is the equivalent code in c#? This is Delphi code Thanks!

{
***** Process scheduling - FCFS, HRRN, SPN simulator ********
**
** Tested on Microsoft Windows XP SP2
**
** Written with Borland Delphi 7 Enterprise edition
**
*******************************************************

**
*******************************************************
* Greets:
**
** To my dear mother, father & anybody who supports me
**
******************************************************* }

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons, ExtCtrls, XPMan, ComCtrls;

(****************************************************************************)
Type
TProcess=Record
Name:String;
ArrivalTime:Integer;
ServiceTime:Integer;
FinishTime:Integer;
TimeLeft:Integer;
Tq:Integer; {Turnaround time: total time in system, waiting + execution}
TqDivTs:Real; {Tq/Ts: Is the normalized turnaround time.
This value indicates the
relative delay experienced by a process.}
end;
(****************************************************************************)
Type TOrigin=Packed Record
X: Longint;
Y: Longint;
end;
(****************************************************************************)
Type
TForm1 = class(TForm)
XPManifest1: TXPManifest;
SaveDialog1: TSaveDialog;
SaveDialog2: TSaveDialog;
MemoService: TMemo;
Memo1: TMemo;
MemoArrival: TMemo;
MemoProcess: TMemo;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Image1: TImage;
BtnStart: TBitBtn;
btnSavePicture: TBitBtn;
btnSaveLog: TBitBtn;
ComboScheduling: TComboBox;
Label5: TLabel;
StatusBar1: TStatusBar;
procedure ComboSchedulingSelect(Sender: TObject);
procedure MemoArrivalKeyPress(Sender: TObject; var Key: Char);
procedure MemoServiceKeyPress(Sender: TObject; var Key: Char);
procedure BtnStartClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure btnSavePictureClick(Sender: TObject);
procedure btnSaveLogClick(Sender: TObject);
(****************************************************************************)
private
Procedure SortQueue;
Procedure CheckErrors;
Procedure ClearCanvas;
Procedure FilterNumericKeys(var Memo:TMemo;var Key:Char); // don't let to enter non-numeric keys

[RaviRanjanKr]

What are you doing man. you are posting same code in VB and now in C# forum and asking some one convert it int to VB and C# language for you. :mad: Don't try to eat like this other wise you can't digest here.

[Lost User]

You would be better to post this question in the Delphi forum, so someone who understands Delphi can read it.

Just say 'NO' to evaluated arguments for diadic functions! Ash

[Luc Pattyn]

For starters, you need to replace multiplications ('*') by divisions ('/'). I don't know Delphi well enough to help you further though. :-D

Luc Pattyn [Forum Guidelines] [Why QA sucks] [My Articles] Nil Volentibus Arduum

Please use <PRE> tags for code snippets, they preserve indentation, improve readability, and make me actually look at the code.

[Dan Mos]

:thumbsup: :laugh:

All the best, Dan

[Pete OHanlon]

Bad news for you here I'm afraid. You've hit a limit in the number of characters that are being displayed. This is a new limit in CP.

I'm not a stalker, I just know things. Oh by the way, you're out of milk.

Forgive your enemies - it messes with their heads

My blog | My articles | MoXAML PowerToys | Onyx

[Luc Pattyn]

And yet you're the latest character that somehow sneaked into this thread??? :)

Luc Pattyn [Forum Guidelines] [Why QA sucks] [My Articles] Nil Volentibus Arduum

Please use <PRE> tags for code snippets, they preserve indentation, improve readability, and make me actually look at the code.

[Henry Minute]

Naughty Luc!

Henry Minute Do not read medical books! You could die of a misprint. - Mark Twain Girl: (staring) "Why do you need an icy cucumber?" “I want to report a fraud. The government is lying to us all.”

[Luc Pattyn]

If comments are to be ignored by the compiler, they better start with a slash, not an asterisk. Or would you suggest an #if false block? :confused:

Luc Pattyn [Forum Guidelines] [Why QA sucks] [My Articles] Nil Volentibus Arduum

Please use <PRE> tags for code snippets, they preserve indentation, improve readability, and make me actually look at the code.

[Henry Minute]

If you had said 'asterisks' by 'forward slashes' I would agree. I thought that the use of the terms for arithmetic operations a touch mischievous. :-D

Henry Minute Do not read medical books! You could die of a misprint. - Mark Twain Girl: (staring) "Why do you need an icy cucumber?" “I want to report a fraud. The government is lying to us all.”

[Luc Pattyn]

Moi? :omg:

Luc Pattyn [Forum Guidelines] [Why QA sucks] [My Articles] Nil Volentibus Arduum

Please use <PRE> tags for code snippets, they preserve indentation, improve readability, and make me actually look at the code.

[Henry Minute]

Ja!

Henry Minute Do not read medical books! You could die of a misprint. - Mark Twain Girl: (staring) "Why do you need an icy cucumber?" “I want to report a fraud. The government is lying to us all.”

[Pete OHanlon]

With my Jedi capabilities, I blow the limit apart. Strong in the force am I.

I'm not a stalker, I just know things. Oh by the way, you're out of milk.

Forgive your enemies - it messes with their heads

My blog | My articles | MoXAML PowerToys | Onyx

[Luc Pattyn]

For a short moment, you sound more like some kind of Terminator. Didn't supper agree with you? :)

Luc Pattyn [Forum Guidelines] [Why QA sucks] [My Articles] Nil Volentibus Arduum

Please use <PRE> tags for code snippets, they preserve indentation, improve readability, and make me actually look at the code.

[_Erik_]

The best advise I can give about this is: Try to do it yourself and ask when you have a concrete problem. By the way, I think you're gonna achieve a new record of downvotes with this post.

[GenJerDan]

https://www.turnsharp.com/delphi-to-csharp.aspx[^] Have no idea if it works well enough to bother with.

[Pete OHanlon]

When you do do it, please try to give your variables more meaningful names. M is a string? :omg:

I'm not a stalker, I just know things. Oh by the way, you're out of milk.

Forgive your enemies - it messes with their heads

My blog | My articles | MoXAML PowerToys | Onyx