PureBasic

Code : Tout sélectionner

Test_File$ = GetTemporaryDirectory() + "Test.tmp"

If CreateFile(0, Test_File$)
     Debug "Fichier créé"
     OpenFile(0, Test_File$)
     WriteString(0, "Hello world")
     
     ; Le fichier est bloqué par windows car toujours ouvert
     If DeleteFile(Test_File$, #PB_FileSystem_Force)
          Debug "Fichier effacé"
     Else
          Debug "Ne peut effacer le fichier (non fermé)"
     EndIf
     
     ; On ferme le fichier
     CloseFile(0)
     
     ; Windows libère le verrou (qui n'a pas de rapport avec l'attribut +R)
     ; Donc on peut maintenant l'effacer
     If DeleteFile(Test_File$, #PB_FileSystem_Force)
          Debug "Fichier effacé (car fermé)"
     Else
          Debug "Ne peut effacer le fichier"
     EndIf    
EndIf

Code : Tout sélectionner

end Finish()

Code : Tout sélectionner

Syntax

End [ExitCode]

Description

Ends the program execution correctly. The 'ExitCode' optional parameter can be specified if the program need to returns an error code (widely used in console programs). 

The 'ExitCode' can be further used e.g. with the ProgramExitCode() command. 

Code : Tout sélectionner

Declare proc_sense_sexecuter_apres_le_end()

calldebugger

; un prg bidon
For i=1 to 5
		debug "i="+str(i)
Next i

End proc_sense_sexecuter_apres_le_end() ; << ici il devrai y avoir une erreur de syntaxe (manque le ":" )




Procedure proc_sense_sexecuter_apres_le_end()
		debug "ceci ne devrai pas s'afficher !! c'est pas logique !" ; et pourtant ça s'affiche !!
EndProcedure

Code : Tout sélectionner

Procedure Coucou()
MessageRequester("coucou","Merci de m'avoir greffé après le End",0)  
EndProcedure

End coucou()

Code : Tout sélectionner

Procedure Coucou()
		MessageRequester("coucou","Merci de m'avoir greffé après le End",0)  
EndProcedure

coucou()
End

Code : Tout sélectionner

#include <stdio.h>

int Truc()
{
printf("Hello World\n");
return 0;
}

int main() 
{
//truc pas trés utile mais possible
return Truc();
}