pepe Δημοσ. 20 Αυγούστου 2003 Δημοσ. 20 Αυγούστου 2003 exo ksekinhsei se PASCAL ena programma kai thelo na ftiakso mia procedure poy na antikathista thn write. h diafora ths tha einai oti an yparxei parametros real, prepei na bgainei aytomata me sygkekrimenh morfopoihsh (px :0:2) kai oxi me thn ekthetikh morfh. 3erw oti einai poly zoriko ayto poy zhtaw, alla mhpos yparxei kapoios guru poy mporei na bohthisei????? eyxaristo poly.
damn3 Δημοσ. 21 Αυγούστου 2003 Δημοσ. 21 Αυγούστου 2003 den tha itan kalytero na ftiaxeis ena object MyReal to opoio tha perieixe dio metablites mia san Real kai mia pou tha tin morfopoieis opws thes esy mesw private procedures? milaw gia object pascal, isws na min sou kanei.
pepe Δημοσ. 21 Αυγούστου 2003 Μέλος Δημοσ. 21 Αυγούστου 2003 nai alla me ayton ton tropo de tha mporo na xrhsimopoio thn write. kai h write exei ena poly oraio xarakthristiko: mporeis na baleis *opoiodhpote* arithmo apo parametroys, diaforetikoy typoy h kathe mia. pos mporo na to petyxo ayto me mia dikh moy procedure? isos tha mporoyse na ginei me kati san overload ths write. alla den ksero an ginetai kati tetoio. arage yparxei kanena compiler-directive, h genika kapoios allos tropos oste h write na bgazei toys pragmatikoys arithmoys me morfopoihsh? exo spasei to kefali moy alla de mporo na bro lysh...
daimonas Δημοσ. 22 Αυγούστου 2003 Δημοσ. 22 Αυγούστου 2003 Ένα από τα "κακά" του διαδικαστικού έναντι του ανικειμενοστραφούς προγραμματισμού. Αν θέσεις ως έξοδο της write όχι την οθόνη αλλά είσοδο σε μια συνάρτηση που θα μορφοποιεί όπως θέλεις τους πραγματικούς ? Θα μπορούσες ίσως να έβαζες και μια συνθήκη που θα εξέταζε κάθε φορά τον τύπο της μεταβλητής και ανάλογα θα καλούσε την αντίστοιχη συνάρτηση? ίσως παίζει αυτό...τώρα για την μορφοποίηση...πάρε τον κώδικα της cout από την C++ και δες πόσα bytes μνήμης δεσμεύει για float.Η εκθετική μορφή είναι αποτέλεσμα μάλλον μικρότερης δέσμευσης χώρου στην μνήμη. Θέλει λίγο ψάξιμο...Νομίζω γίνεται...
pepe Δημοσ. 22 Αυγούστου 2003 Μέλος Δημοσ. 22 Αυγούστου 2003 nai, ton typo mias parametroy mporeis na ton katalabeis apo to megethos ths. alla h eksodos ths write san eisodos se synarthsh? pws mporo na to kano ayto? telika aytoi oi magkes pos exoyn ftiaksei thn write kai dexetai aprosdioristo plithos parametron? emeis de mporoyme na ftiaksoyme mia tetoia procedure?
damn3 Δημοσ. 22 Αυγούστου 2003 Δημοσ. 22 Αυγούστου 2003 Auto pou ennow einai to parakatw: http://rafb.net/paste/results/o3034668.html douleuei se delphi 6 ( object pascal v14 ).
pepe Δημοσ. 22 Αυγούστου 2003 Μέλος Δημοσ. 22 Αυγούστου 2003 oraios kodikas damn3! alla dystyxos den moy kanei. proton einai gia delphi eno ego thelo kati gia tis palioteres (pro-delphi) ekdoseis. deyteron moy ta xalaei ayto to: Write( MyReal.RealValue ) ayto poy xreiazomai einai kati san to: MyWrite( theReal, theString, ... ) poy na dexetai opoiodhpote plithos kai typo dedomenon, opos kai h kanonikh write. an broyme pos kataferan na ftiaksoyn thn write na to kanei ayto, tha katafero na ftiaksw kai thn MyWrite... eyxaristw gia th mexri tora boithia. kalodexoymenh kathe allh syneisfora!
damn3 Δημοσ. 22 Αυγούστου 2003 Δημοσ. 22 Αυγούστου 2003 apo oso eida oi Write kai WriteLn einai enswmatwmenes mesa se compiled arxeia (se delphi, free pascal kai turbo pascal). wstoso se delphi yparxei o kwdikas (RTL->System.pas) pou periexei mesa tis synartiseis pou kalei i Write & WriteLn gia kathe type antistoixa.
pepe Δημοσ. 22 Αυγούστου 2003 Μέλος Δημοσ. 22 Αυγούστου 2003 system.pas??? ayto exei ** 20.000 ** grammes kodika!!! me to poy to anoiksa moy irthe zalada!! :? to na katso na to psakso kai na to analyso olo ayto einai dystyxos poly pano apo tis programmatistikes moy dynatothtes...
pepe Δημοσ. 25 Αυγούστου 2003 Μέλος Δημοσ. 25 Αυγούστου 2003 kammia poio... "logikh" :wink: protash kaneis?
Προτεινόμενες αναρτήσεις
Αρχειοθετημένο
Αυτό το θέμα έχει αρχειοθετηθεί και είναι κλειστό για περαιτέρω απαντήσεις.