2,103 Topics
 | |
| | Need help to access Ethernet network and send and receive small packets of data. I have to write this is Borland Pascal 7 under DOS. Any ideas? |
| | Hi well ive got school project and well found this site looks like real deal not like the fake ones ive registered 2 and this site can really help?... Well ive done most of my programmeing just cant figure the search code i cant get..... I need to say type … |
| | This is what i have done so far:- [CODE] Program ssd; uses wincrt; var x:real; Begin x:=1; repeat clrscr; gotoxy(32,0); writeln(x:5:2); x:=x+0.001; until KeyPressed; clrscr; gotoxy(20,0); writeln('You Have Filled The Amount Of £',x:5:2); end.[/CODE] This is my ticker, it goes up on 0.01's forever but its slow and i did … |
| | hi everybody, i'm using TNMFTP component on delphi no problem at all (download, delete, rename, connect...) but when i try to use UPLOAD method to put myfile on ftp server it return me this error: "CANNOT OPEN FILE myfile" and then "access violation"... why it's trying to open the file? … |
 | I have created several new components but cannot get them to appear in the tool palette. (BDS2006). The components are created in a package that compiles. The package includes the register procedure in the Interface and the implementation sections as follows: Procedure Register; Begin RegisterComponents('JESComp', [TcolorButton, TAButton, TBButton, TCButton, TDButton, … |
| | i need to know how to trap all the inputs from a barcode scanner connected to a usb port |
 | Anybody know how to do this?? i really don't have idea with this. please helps. thx in advance.  |
 | Who am I? Not a chinese actor, but a life-time math/Cs student from Finland My other interests are: Suzuki Hayabusa, HP calculators, Gospel Riders, ... My problem eg. Why am I here (in this CyberSpace) Ackermann function [I][COLOR="Red"]iteratively[/COLOR][/I]? Please use C or Pascal for (pseudo)code Thanks!  |
| | hey there i made a second form and when you click a button it pop up, but in the code of the first form it can see form2 but not the buttons of form2 could pls send the answer to [email]kotsz@live.nl[/email] bc im not that active here, i hope ill … |
| | Hello, when attempting to open an explorer i get the following message: "an unhelded win32 exception occured in explorer.exe[1704]" and I'm asked to debug using visual studio. How can I fix this? Thanks. Pascal |
| | Hello, when attempting to open an explorer i get the following message: "an unhelded win32 exception occured in explorer.exe[1704]" and I'm asked to debug using visual studio. How can I fix this? Thanks. Pascal |
 | please see my code : there are something wrong?how i can check if stack is empty?? NB : isi = content of stack atas = top of stack tumpukan is stack [CODE]function POP (var T : Tumpukan) : integer; begin POP := T.Isi[T.Atas]; T.Atas := dec[T.Atas]; end;[/CODE] anyhelp will be … |
| | i make push procedure but its not working, there something wrong with my code?? please see my following push procedure : [CODE=pascal] procedure PUSH (var T: Stack; var Full: boolean; X: integer); begin if T.Top = MaxElemen then Full := true else begin T.Top := inc(T.Top); T.Contain[T.Top] := X end … |
| | Hi, I need to send file from my computer just with public IP to another PC which has public IP too. Is there any way how to send it directly? |
| | create an array of marks [1..5] then create a while loops to ask the user for 5 marks then displayed all stired marks. [code=pascal]program marks; var mark:array[1..5] of integer; x:integer; counter:integer; Begin counter:=1; x:=1; while (counter<=5) do begin writeln('input marks'); readln(mark[x]); x:=x+1; counter:=counter+1; end; writeln(mark[3]); end.[/code] thankx in advanced for … |
| | Just a few questions:- [LIST=1] [*]Can you add colours? [*]Can you create boxes? [*]Can you update constants? [*]can you create drop down boxes? [*]can u assign a keyboard key to a letter/number? [*]is there something so when you press a key that the window closes? [/LIST] thank you :):) |
| | I'm just curious, I was using setLength to increment my arrays all the while but i've been hoping.. is there any push and pop functions for delphi so that i can dynamically put values into my array without having to code anything myself to increase the array size? |
| | Hi there, I just bumped across this website through google and found it very neat. I am self taught at Delphi, and know very little. I know there are quite a few ways to send the virtual keypresses, but I only know of one and I doubt I am using … |
| | I have 25 years programming experience and am currently investing my time at trying to understand the visual C++ language. I am familier with several others. I find it very difficult to find someone who knows something about this language and is also willing to help. I completed a whole …  |
| | Hello, I am a first year computing AS student coding a petrol pump program. You can see the specification [URL="http://pascalproject.wordpress.com/2008/01/31/project-specification/"]here[/URL]. I am a little stuck and I was wondering if anyone could point me in the right direction. I have coded a seven segment display using arrays, procedures, write lines … |
| | Hi all... I have a problem and need to get your point of view regarding card game. 1. I need to build some kind of animation on event to flip playing card from back side to front and vice versa when needed. My idea is to assign picture to Timage … |
| | can some1 help me on petes petrol pump in delphi please just a little problem |
| | if you have completed the petes petrol pump in delphi can u email me i need some help asap |
| | Hi all I'm self taught and relatively new to programming and have been battling with a TDBGrid's onMouseDown event in Delphi 7. Hopefully I'm missing something small and you masters out there will be able to enlighten me! I have a TVirtualStringGrid and TDBGrid on my form. I want to … |
| | If this is in the wrong place, I apologize. I use ShellExecute only in Delphi, but I am aware that it may not be properly considered part of the language. I have a program that is supposed to generate a .csv file for an output report. However, my boss wants … |
| | This Is My Code:- [code] Begin gotoxy(31,1); write('Peters Petrol Pump'); gotoxy(31,2); write('=================='); gotoxy(0,4); write('Welcome To Peters Petrol Pump...Here Are Your Options:-'); gotoxy(5,6); write('1. Console'); gotoxy(5,7); write('2. Petrol Pump'); gotoxy(5,8); write('3. Exit'); gotoxy(0,10); write('Please Select An Option...'); read(StartingAnswer); if StartingAnswer =1 then Begin clrscr; gotoxy(30,11); write('Under Construction'); repeat gotoxy(30,12); write('Press Enter … |
| | hi program to ask the user a username and a password if pass and username good display OK else clear screen and reask the user for username and password again. this will continue until good username and password entred. using while loops thanks in advanced  |
 | Hi guys :) I've just learn programming in turbo pascal, and my teacher made an assignment to make pyramid of numbers as this: [code] 1 1 2 1 2 3 3 2 1 2 1 1 [/code] so far i've only come up as this: [code] uses crt; var i,j,k … |
| | Hi everyone I have a simple yet annoying problem. I'm trying to change the selected color in a stringgrid, ie when selecting a cell the background must change color. The grid has no fixed rows or columns and only one column (like a simple list editor). I've overridden ondrawcell for … |
| | Is it possible for an imported COM DLL server to be seen as an object in the 'TOOLS PALETTE' ? Thanks. |
| | Hi again, this is a simple programme that I can't make work :S in turbo pascal. [COLOR="Green"]Write a program to create a new list and then display it through a Recursive Procedure ( and use 'p' as a local variable).[/COLOR] This is what I could do but considering I hate … |
| | well i have set two tasks firstly create the seven segement display and do some sort of timer with the 7 segment display, i have done the seven segment display and here it is:- [CODE] Program SevenSegmentDisplayConverter; Uses Wincrt; var Line1 : string; Line2 : string; Line3 : string; x … |
| | Can somebody help me make a 7 segment display please i need help i tried it but failed can some1 help me please send it me or just tell me a site where i can get it from |
| | How do I make it show text? I'm completely new to this, my dad's wanting me to make this customer display screen show text, which on paper should be easy.. It's a WD-202 model, pretty common customer display pole, I've called a friend for help and he told me to … |
| | Anyone know how to convert real e.g. 105.6 to string e.g. 105.6? |
| | I want to fill a matrix randomly with True and False. The code below does produce a matrix where the proportion of True is roughly p, but all the Trues are at the beginning, and all the False at the end (so it looks like it generates the same random … |
| | I'm working on a program designed to draw numeric summary information out of a database. The user can select four criteria via dropdown combo boxes, and the information is displayed in a string grid (TStringGrid component). A second string grid component is used to hold the highest-level division of the … |
| | I don't know why the next program doesn't find an element of the array. [CODE=delphi] program rec; {$APPTYPE CONSOLE} uses SysUtils; procedure intarray(a:array of integer;longar:integer); begin if longar>=0 then begin write(a[longar],' '); intarray(a,longar-1); end; end; procedure exist (a:array of integer;num2,longar:integer;found:integer); begin if longar>1 then begin if a[longar]=num2 then found:=1 else … |
| | Hello everyone, Gimmick here, just arrived on site. I am a noob regarding 'real' programming. Started on Oracle SQL/PLSQL just 1,5 years ago for my work. Before that I worked a year with C/All, a Navision own language based on Pascal. Joined the site since it seems like a fun …  |
| | Hello, How does my application know when another application window has lost its focus. I want my aplication can track if the active window has changed. Please paste some code about using shell hooks and HSHELL_WINDOWACTIVATED or without hooks to do this task. Thanks! |
| | hello! im trying to rotate a tbitmap image using scanlines, and cant figure out how to do it! ive go it working moving pixel by pixel but i want to be able to speed it up using scanlines. im using borland 6 C++, and doin some reasearch they (borland) gave … |
| | Hello everybody. I have a veeery weird and interesting problem. I downloaded a little piece of code, in *.txt form. It it said to be a polyglot, that is, exactly the same code would compile and work in more programming languages. In this case, the languages are : COBOL, Pascal, … |
| | I am working on a school project, I need to do a keystroke to simulate filling car with petrol. There is two program I have done below but none of them work. I use Borland developer studio 2006 (Delphi Pascal) and does anyone know how to clear the screen in … |
| | Hi, We are having problems with files FTP'ed and renamed around the various locations. JPGs can't be viewed, Exe's don't run. It seems to be something to do with the ownership of the files. The offending files have an owner of "Administrators" or else blank. TIA Mark |
| | I have a Petrol Pump system that runs a timer that simulates the litres that run and the display shows the images inserting into an image box. Then the Price at current is the litres * the set price per litre. Thats where the problem is because I can't get … |
| | want to know the coding of h ow to define connection of SQL database wid deplhi so that i can insert data in database |
| | I've created a playing card descendent of TCustomControl and I want it to have rounded corners. The card is displayed in a Paint procedure where I determine the bitmap and then use a Canvas.Draw(0, 0, FCardBMP); This approach works well except - no rounded corners. Setting FCardBMP.Transparent := true; doesn't … |
| | Hi, I am using Delphi 7 personal along with Indy 10. I have a program that uploads a 7 mb .dat file to a remote server thru ftp. I have my code wrapped into a try/except but for some reason and at some point, the transfer fails, and i get … |
| | [code]program pics; var N : integer; OutString : string; begin for N := 1 to 6 do begin Str(2*N, OutString); writeln('image'+ OutString) end end.[/code] That is the code I've got and here is its output: image2 image4 image6 image8 image10 image12 but here is the output format that I want: … |
| | i am seeking for an answer to fix my unit graph problems basically when i try to use it this error pops up BGI error: Graphics not initialized (use InintGraph) the funny thing though is that this unit works fine sometimes soooo your answers will be appriciated thanks |
The End.