Buchempfehlung
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Umfassend, aber leicht verständlich führt dieses Buch in die Programmierung von ATMEL AVR Mikrocontrollern ein. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe
Liste
Übersicht / Liste
Neu
Datei hochladen
Suche
Quellcode suchen
Download
Dateidownload

warning 4(1): Suspicious pointer assignment

Uploader:MitgliedThePuppetMaster
Datum/Zeit:03.11.2007 06:59:43

Type C4Kernel_Type
    C4A_Add as Sub (as String)
    C4A_AddEx as Sub (as String, as Integer)
End Type

'-----------------------------------------------------------------------------------------------------
Declare Sub C4A_AddEx (ByRef V_Text as String, ByRef V_Color as Integer)

'-----------------------------------------------------------------------------------------------------
Sub C4A_Add (ByRef V_Text as String)
Print V_Text;
End Sub

'-----------------------------------------------------------------------------------------------------
Sub C4A_AddEx (ByRef V_Text as String, ByRef V_Color as Integer)
Color V_Color
Print V_Text;
End Sub

'-----------------------------------------------------------------------------------------------------
Dim Shared C4Kernel as C4Kernel_Type
C4Kernel.C4A_Add = @C4A_Add
C4Kernel.C4A_AddEx = @C4A_AddEx