Hallo,
In meinem Projekt mache ich mit der Max WinAPI 2 DLL in einem Room eine Tabelle. Mit einem Listview. Eigentlich erstellt der GM nur den Anfang, die einzelnen Zeilen aber stehen in einer TXT Datei. Es tut mir leid wenn ich den Namen des erfinders grad nicht mehr weiss, jedoch wird diese TXT-File mit dem script_add_v3 System ausgeführt und mit der XorCrypt DLL von BlackSpark verschlüsselt.
Nun, bei einem Roomwechsel habe ich schon alles Probiert: API_Free(), with(table) instance_destroy(), instance_destroy(), usw. - ABER DIE TABELLE BLEIBT BESTEHEN, AUCH IN EINEM ROOM IN DEM DAS OBJEKT DER TABELLE GAR NICHT IST!
Ich gebe euch nur ungern den Code, weil es eigentlich ein Geheimprojekt ist, aber hier ist er:
Im
:
Im
0 :
Alles anzeigen
Im
10 :
Und im
Game End Event:
So, wath is the Problem?
PS: Der Code ist abgeändert an sensiblen Stellen! Es könnte durch ein Fehler mal irgendwo ein " Fehlen!
PS 2: Ich musste aus etwas komischen Gründen das API_Init() auf ein API_Init1() verlegen...
Danke,
jlsnews
In meinem Projekt mache ich mit der Max WinAPI 2 DLL in einem Room eine Tabelle. Mit einem Listview. Eigentlich erstellt der GM nur den Anfang, die einzelnen Zeilen aber stehen in einer TXT Datei. Es tut mir leid wenn ich den Namen des erfinders grad nicht mehr weiss, jedoch wird diese TXT-File mit dem script_add_v3 System ausgeführt und mit der XorCrypt DLL von BlackSpark verschlüsselt.
Nun, bei einem Roomwechsel habe ich schon alles Probiert: API_Free(), with(table) instance_destroy(), instance_destroy(), usw. - ABER DIE TABELLE BLEIBT BESTEHEN, AUCH IN EINEM ROOM IN DEM DAS OBJEKT DER TABELLE GAR NICHT IST!
Ich gebe euch nur ungern den Code, weil es eigentlich ein Geheimprojekt ist, aber hier ist er:
Im

Im

GML-Quellcode
- API_Init1()
- script_add_init()
- xor_crypt_init()
- xor_crypt_password("password")
- if (!registry_exists_ext("\Software\Software","path"))
- {
- alarm[10] = 300
- exit;
- }
- path_soft = registry_read_string_ext("\Software\Software","path")
- xor_decrypt_all(path_soft+"\files.or",path_soft)
- tab = script_add_from_file(path_soft+"\tab.spk","tab")
- tab_e = script_add_from_file(path_soft+"\tab_e.spk","tab_e")
- registry_set_root(0)
- if (registry_exists_ext("\Software\Software","language"))
- {
- Win5 = window_handle();
- Listview1 = API_Listview_Create (Win5,1,1,800,424,LVS_REPORT,WS_EX_CLIENTEDGE);
- API_Listview_SetExtendedStyle (Listview1,LVS_EX_FULLROWSELECT);
- language = registry_read_string_ext("\Software\Software","language")
- if (language == "dde")
- {
- // BEGINNE LISTVIEW FÜR DEUTSCHSPRACHIGE
- API_Listview_InsertColumnText (Listview1,0,250,"Dies");
- API_Listview_InsertColumnText (Listview1,1,550,"und Das");
- script_ex(tab)
- // ENDE DEUTSCH
- }
- else
- {
- // BEGINNE LISTVIEW FÜR ENGLISCHSPRACHIGE
- API_Listview_InsertColumnText (Listview1,0,250,"This");
- API_Listview_InsertColumnText (Listview1,1,550,"and That");
- script_ex(tab_e)
- // ENDE ENGLISCH
- }
- }
- else
- {
- // BEGINNE REGISTRY-SCHREIBEN FüR ERSTEN START (DEUTSCH) UND ZEIGE DEUTSCHES LISTVIEW
- registry_write_string_ext("\Software\Software","language","dde")
- Win = window_handle();
- Listview1 = API_Listview_Create (Win,1,1,800,424,LVS_REPORT,WS_EX_CLIENTEDGE);
- API_Listview_InsertColumnText (Listview1,0,250,"Dies");
- API_Listview_InsertColumnText (Listview1,1,550,"und Das");
- script_ex(tab)
- // ENDE REGISTRY-SCHREIBEN UND DEUTSCHES LISTVIEW ANZEIGEN
- }
Im

GML-Quellcode
- if (!registry_exists_ext("\Software\Software","path"))
- {
- wd_message_simple("Fehler 501: Es sind wichtige Dateien nicht vorhanden bzw. inkorrekt. Bitte melden Sie dies dem Support mit der Fehlernummer 501. Press OK for the English message!")
- wd_message_simple("Error 501: There are important files are missing or incorrect. Please report this to the support with the error number 501.")
- }
- else
- {
- alarm[0] = 30
- }
Und im

So, wath is the Problem?
PS: Der Code ist abgeändert an sensiblen Stellen! Es könnte durch ein Fehler mal irgendwo ein " Fehlen!
PS 2: Ich musste aus etwas komischen Gründen das API_Init() auf ein API_Init1() verlegen...

Danke,
jlsnews
