PDA

View Full Version : تبدیل کد به وی بی



iamebadi
چهارشنبه 01 آذر 1385, 12:43 عصر
با سلام خدمت همه دوستان عزیز
من یک پروژه با دلفی دارم و می خوام اون رو به وی بی دات نت تبدیل کنم
کسی می تونه معادل این کدها را به من در وی بی دات نت بگه.یا حداقل از چه ساختارهایی باید در وی بی برای تعریف این کدها استفاده کنم خیلی فوریه
پیشاپیش سپاسگزار و ممنونم


type
string15=string[15];
TempStrings =array[1..2] of string15 ;
string3=string[3];
Token = array [1..50,1..100] of string15 ;
Token_Number_Per_Line= array [1..50] of byte ;
Tables_Name = array[1..10] of string15;
T_N_and_F_N = record
Table_name:string15;
Field_name:string15;
end;
Fields_Name = array[1..15] of T_N_and_F_N;
Order =record
Columns:Integer;
Rows:Integer;
end;
op =record
case Is_Table_Field:boolean of
True:(Table_name:string15;
Field_name:string15 );
False:(Literal:string15);
end;
Field_Projection =record
oprand1:op;
oprand2:op;
Operator:string3;
two_table_Field:boolean;
end;
Field_Projections=array[1..50] of Field_Projection;


var
TK :Token;
TNPL:Token_Number_Per_Line;
TLine:byte;
Final_TBName,TBName:Tables_Name;
Final_Table_num,Table_num:byte;
F_name:Fields_Name;
Selection_fields:byte;
FP:Field_Projections;
FP_num:byte;

www.topblogposts.com (http://www.topblogposts.com)