Posts
 
Reputation
Joined
Last Seen
0 Reputation Points
Unknown Quality Score

No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.

0 Endorsements
~1K People Reached
Favorite Forums
Favorite Tags

7 Posted Topics

Member Avatar for bob on whidbey

hi if you want to be able to add a new record, i suggest that you draw a DBGrid on your form. since DBGrid has delete, add, assign, update, edit and goto. so you dont need a code for that, all you have to do is to link your DBGrid …

Member Avatar for waynera
0
135
Member Avatar for Vega_Knight

hi lets say the array name is jx_man: var jx_man: array[1..45] of string; counter: integer; begin for counter:= 1 to 45 do begin //initialize jx_man jx_man[counter]:= ''; for counter:= 1 to 45 do begin //lets allow users to enter data jx_man[counter]:= inputbox('enter data','my home',''); //our array will contain 45 strings …

Member Avatar for Clive29
0
139
Member Avatar for acs_andrade

hi there. it is gonna be hard for us to just send you the code. - tell us what the program do -what components you need for it and supply us with some brief notes about your project. if you do that, i will be able to send you the …

Member Avatar for Clive29
0
92
Member Avatar for Clive29

[B][/B] i know its kinda funny, but please help me. my father is a bussiness man and he wants to hire a programmer to design a program that record bussiness history like their products, their profits and even to perfom necessary calculations for his wide supermarket. since the stock have …

Member Avatar for jsosnowski
0
110
Member Avatar for bbradley

hi 1.go to the file tab and click " new form" 2. put a button on the form1 double click the button and go top, on the [B]implementation[/B]. under [B]implementation[/B], put " uses unit2; ( since you have two forms) then go down under begin and put this code: button1.enabled:= …

Member Avatar for jsosnowski
0
337
Member Avatar for monxxx

try the following Function Swap(x: integer;y: integer): integer; var Temp: integer; begin //start swapping; temp:= edit.text; edit1.text:= edit2.txt; edit2.text:= Temp;// you done end;

Member Avatar for Clive29
0
273
Member Avatar for detoxx

try the following var counter: integer; student_id: array[1..70] of integer; student_mark:integer; Begin student[counter]:=[1..70]; //for counter:= 1 to 70 do //showmessage[student_mark][student_id]; //display this on memo1 memo1.lines.add(student_id[counter]); End; End. just try it for one button

Member Avatar for Clive29
0
158

The End.