pascal

[apressas]

παιδιά πως μπορώ να τρέξω ενα αρχειο μεσα απο pascal ????

δλδ να μου δώσετε τον κωδικα ( οχι ολο το προγραμμα , μονο αυτο που ζητάω)

 

δλδ να αρχιζω το προγραμμα να με ρωταει αν θελω να ανοιξω το ταδε αρχειο ( γιατι περι αρχειου προκειτε , συγκεκριμενα βαση δεδομενων ) και να παταω το enter και να ανοιγει

 

thanks in advance

[GrMikeD]

des tis parakatw sunartiseis apo to help tis pascal: assign, reset, rewrite, write, read kai close.

[apressas]

Ποιο help ?

δεν εχει help η freepascal

 

μαλλον χρειαζομαι compiler καινουργιο

[GrMikeD]

aaa freepascal xrisimopoeis? ok

 

eeee psakse sto google gia pascal file operations i kati analogo gia na breis auto pou thes.

 

Egw dustuxws exw arketo kairo na asxolithw gia na se boithisw parapera...

[GrMikeD]

By the way... sugxaritiria gia to www.pcwarriors.tk! faineste na exete meraki oli i omada kai na sas aresei na ekserevnate ton kosmo twn upologistwn!

[alkisg]

Θες να τρέξεις το αρχείο ή να το ανοίξεις;

 

Τρέχω π.χ. το tade.xls σημαίνει ότι θα ανοίξει το excel και θα φορτώσει το tade.xls. Σ' αυτήν την περίπτωση η συνάρτηση που ψάχνεις είναι η Exec.

 

Ανοίγω σημαίνει ότι το πρόγραμμά ΜΟΥ διαβάζει τα περιεχόμενα του αρχείου, τα δείχνει στην οθόνη κτλ. Σ' αυτήν την περίπτωση οι συναρτήσεις που ψάχνεις είναι αυτές που σου είπε ο GrMikeD.

[takis456]

Otan les na trekseis ennoeis na ekteleseis ena arxeio (.exe,.com ktl) i na deis ta periexomena tou? Sti vasi dedomenwn pou les ti 8a kanei to programma? Tha diavazei apta arxeia ta dedomena? I 8a trexei kapoio ektelesimo tis vasis?

[apressas]

Nα τρέχει ενα αρχειο θελω , ο alkis το καταλαβε

σας ευχαριστώ !

grmiked ευχαριστώ για τα καλα σου λογια

[alkisg]

Για να τρέξεις από DOS-pascal κάποιο ΑΡΧΕΙΟ πιθανώς να χρειάζεται να χρησιμοποιήσεις και την εντολή start του DOS, δηλαδή αν το

Exec('tade.xls', '')

δεν πιάσει, δοκίμασε και το

Exec('start.exe', 'tade.xls').

 

Επίσης στην Turbo Pascal τουλάχιστον έπρεπε να αλλάξεις και τα memory switches ώστε να μην πιάνει όλη την conventional μνήμη το πρόγραμμά σου και να επιτρέψει σε κάποιο άλλο πρόγραμμα να ξεκινήσει.

Αν θυμάμαι καλά γράφαμε κάτι σαν

{$M 65536, 16384, 65536}

 

Η Free Pascal πιθανώς να έχει σχετική επιλογή στα μενού της.

[GrMikeD]

Apo oti eida me ena grigoro psaksimo i Free Pascal einai kai gia dimiourgia 32-bit kai periexei win32 extensions tis delphi. Gia auto, boreis na xrisimopoiiseis kateutheian sunartiseis opws i shellexecute() pou einai dilwmeni sto windows.pas.

[apressas]

σας ευχαριστώ ολους