zur Startseite zum Inhalt zur Navigation

Ctools

 

In dieser Unit habe ich mal ein paar nützliche 
Funktionen und Prozeduren gesammelt.

!! Achtung !!

Die Auflistung der Funktionen wurde erstellt als ich 
die Ctools online gestellt habe.

Ich habe nun in den Header eine Versionsnummer 
eingetragen so das jeder prüfen kann ob er stets die 
Aktuellste Version von CTools hat.

Unter anderem sind enthalten :

// Gibt das aktuell vom System benutzte 
Trennzeichen 
// von Vorkomma- und Nachkommateil zurück
Function GetfloatSeparator: String;

// Wandelt einen Floatstring in eine Floatzahl um, 
// der Separator kann explizit angegeben werden.
Function strtofloat2(Value, Seperator: String): real;

// Diese Prozedur tut nichts, sie dient nur zum 
// Debuggen da der Compiler Haltepunkte auf ihr 
// erlaubt. 
Procedure nop;

// erlaubt das Berechnen des Sinus im Gradmaß
Function Sinus(E: Extended): Extended;

// erlaubt das Berechnen des Cosinus im Gradmaß
Function CoSinus(E: Extended): Extended;

// bei Eingabe eines DeltaX und DeltaY berechnet der 
// Rechner daraus den Winkel
Function arcTangens(x, y: Extended): Extended;

// erlaubt das Berechnen des Tangens im Gradmaß
Function Tangens(Value: Extended): Extended;

// Genau wie Mod nur auch mit negativen Zahlen
Function Mod2(Value, Modulo: Integer): integer;

// Genau wie Mod2 nur für Floatzahlen, aber 
// Vorsicht der PC hat eine gewisse Ungenauigkeit die 
// die Ergebnisse manchmal deutlich verfälschen
Function Modfloat(Value, Modulo: Extended): Extended;

// Wandelt eine Zahl Basis Old_Base in eine Integer 
// Zahl Basis 10 um
Function Base_Convert(Number: String; OLD_Base: 
Byte): int64; overload;

// Wandelt eine Dezimalzahl in eine Zahl der Basis 
// New_base um
Function Base_Convert(Number_Base_10: Int64; 
New_Base: Byte): String; overload;

// Komprimiert ein jpg File und speichert es unter 
// Newjpgfile wieder ab.
// Compression im Bereich zwischen 1 .. 100
Function Compress(jpgFile, Newjpgfile: String; 
Compression: integer): Boolean;

// vertauscht 2 Variablen
Procedure Tausche(Var i1, i2: integer); overload;
Procedure Tausche(Var i1, i2: Int64); overload;
Procedure Tausche(Var i1, i2: Single); overload;
Procedure Tausche(Var i1, i2: Double); overload;
Procedure Tausche(Var i1, i2: Extended); overload;

// Gibt true zurück wenn sich die Ellipsen schneiden
Function Ellipsecollision(E1, E2: Trect): boolean; 
overload

// Gibt true zurück wenn sich die Kreise schneiden
Function Kreiscollision(P1, P2: Tpoint; R1, R2: 
integer): boolean; overload

// Gibt true zurück wenn sich die Rechtecke schneiden
Function Rechteckcollision(r1, r2: Trect): boolean; 
overload

// Gibt true zurück wenn sich die Rechtecke schneiden
Function Rechteckcollision(Left1, Top1, Right1, 
Bottom1, Left2, Top2, Right2, Bottom2: Integer): 
boolean; overload

// Gibt true zurück wenn sich die Ellipse mit dem 
// Rechteck schneidet
Function EllipseRechteckcollision(E1, R1: Trect): 
boolean; overload

// Gibt true zurück wenn sich die Ellipse mit dem 
// Rechteck schneidet
Function EllipseRechteckcollision(Left1, Top1, 
Right1, Bottom1, Left2, Top2, Right2, Bottom2: 
Integer): boolean; overload

(*************** Rechnen mit Brüchen ***************)
// der Typ um Brüche exakt zu berechnen.
Type
 TIQ = Record
   Zaehler, Nenner:integer;
 end;

// gibt einen Bruch mit Zähler und Nenner zurück.
Function IQ(Zaehler, Nenner: Integer): TIQ;

// Wandelt einen String in einen Bruch um. Z.B. 
// Zaehler / Nenner
Function StringToIQ(Value: String): TIQ;

// Wandelt einen Bruch in einen String um
Function IQToString(value: Tiq): String;

// Wandelt einen Bruch in eine Gleitkommazahl um
Function IQtoFLOAT(Value: TIQ): Real;

// Kürzt einen Bruch
Function IQKuerzen(Value: TIQ): TIQ;

// Addiert 2 Brüche
Function IQPlusIQ(Value1, Value2: TIQ): TIQ;

// Subtrahiert 2 Brüche
Function IQMinusIQ(Value1, Value2: TIQ): TIQ;

// Multipliziert 2 Brüche
Function IQMALIQ(Value1, Value2: TIQ): TIQ;

// Teilt 2 Brüche
Function IQDIVIQ(Value1, value2: TIQ): TIQ;

(************ Rechnen mit Brüchen Ende *************)

 

(7594 Hits)

 

  torus_chess     labyrintcreator     3d_puzzle     kartei     codecounter     piemenue     winkonfig     passbildcreator     gefangenen_dilemma     io_adapter     opengltruetypefont     tipp_it     wecker     turing_maschine     simpleray     wii_headtrack     suchen_dialog     delforlaz     xml     ym1602c     maw     feder_masse     pwm     wii_whiteboard     sirpinksy     project_collector     2048     ae20125     zufall     heapsim     tasker     gedanken_leser     gc_solver     matrix     rsa     pingpong     hough_transformation     serial     bezier     gpu_info     vokabel     sprite_engine     library     simple_cad     fouriersynthese     tg12864b     funkuhr     picking     baum     textur_filterung     ntools     anty_krypt     klab     rollenspiel     fir_iir     race_condition     binomial     kwirk     sortieren2     graphen_algos     bmp_font     qprogrammer     steganographie     vedische_multiplication     td     game_of_life     boxmuller     balanced2     pi     basic     dithering_mask     numeric_instability     imageinspector     quadtree     wuerfelzauber     portal     proof2e1     puzzle     atmegaboard     transparenz     picturerotate     tbitstream     tclockex     diffusionsfilter     clear_engine     simple_font     greenfoot     hilbert     balanced     copycommander     network_bandwidth_limiter     address_db     pentago     dcf77     fakenet     cpu_load     calender     uuart     wireworld     openglsphere     digiman     c_depencies     projizierte_schatten     tippsy3     mauskoordinaten     rubik_cube2     jazzball     c_libs     sdl_tcp_ip     fingerspeed     mastermind     trio     chunkmanager     socket     hoertest     opengl_graphikengine     screensaveblocker     sfxr     stm     nsudoku     iq_block     logger     crc     dxtools     ccm     trackball     tankplan     picam     fourier     tokenizer     fpc_depencies     shannon_fano_coding     weihnachtsstern     proto     clickomania     attributgrammatik     einstein     button_tool     alt_f2     funplay2     io_serializer     ctools     parken     lzw     laufschrift     rent_it     network_listener     multilanguage     stereoprojektion     textfilter     minipaint     raetsel     euler     send_get_file     dithering_filtering     opengl_spriteengine     episodenmanager     generische_liste     wuerfel     netzwerkprotokol     bitverknupfung     8x8x8     info     exp_func     5ermedian     zauber     summe_n     partikelengine     verzeichnung     reihen     updater     ascii     weihnachtskalender     mandelbrot     perlin_noise     hex     sql     l_system     codeviewer     loop     galton_brett     dcommenter     pathfinder     desktop_lock     screeny     gebmanager     tetris     filetools     induktion     bignumber     sudoku     cleanup     newton_interpolation     pointer     affenpuzzle     bww     waage     schachprobleme     gorilla     4_wins     file_transfer     bigprim     cubemap     knack     farbspectrum