Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Zlecenie]Programik !


lexox

Rekomendowane odpowiedzi

Opublikowano

Ogół kolego ogół, dysleksja to pikuś w porównaniu z twoim lenistwem... A jest coś nie masz czegoś takiego jak sprawdzanie ortografii :)?

czwartkowy posmak w ustach przypomina
że nie ma sensu owijać w bawełnę
zmarzniętego truchła

przez latarnię ktoś przerzucił sznur
cumuje statek w bezpieczną przystań

czuję jak na skroniach zasycha sól
...

Opublikowano

Witam, tak się tylko pytam po co ci program, który importuje plik mpdata do folderu czyli twojego profilu w grze ??? Gram już kilka lat w COD'a i ten plik moim zdaniem (chyba w 70%) odpowiada za odblokowanie broni, lvl itp. jeśli nie wiesz jak przenieść ten plik to ci powiem :)

GrottyCracker22.png
Opublikowano

Prosze twoj kod w edicie po lewej wpisujesz "\plik do przeniesienia" w prawym "\do jakiego folderu\" czekam na plusy;)?

ps. testowane na viscie. i dziala:)

przenosi plik z jednego folderu do drugiego

 




#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 469, 279, 192, 124)
$Group1 = GUICtrlCreateGroup("Plik do importu", 8, 8, 209, 193)
$edit = GUICtrlCreateEdit("\plik.format", 8, 24, 209, 177)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Importuj", 8, 216, 459, 25)
$Button2 = GUICtrlCreateButton("Wyjscie", 8, 248, 459, 25)
$edit1 = GUICtrlCreateEdit("\do jakiego pliku\", 264, 24, 201, 177)
$Label1 = GUICtrlCreateLabel("Folder do którego ma przeimportować", 272, 8, 181, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
	Case -3
		Exit
	Case $Button2
		Exit
	Case $Button1
		FileInstall(@ScriptDir & GUICtrlRead($edit), @ScriptDir & GUICtrlRead($edit1) & GUICtrlRead($edit))

    EndSwitch
WEnd

Do
$wiek+=1
Until ŻycieGetMsg() = -3

zbieram +

Opublikowano

Plusy... Od teraz będziesz wiedział, że jeśli chodzi o ilość plusów rzędu 100+ to ten, kto to oferuje zwyczajnie się zalewa, byle dostać to, czego chce :P

 

Oczywiście, autorze bez urazy, te słowa skierowałem do ogółu :)

czwartkowy posmak w ustach przypomina
że nie ma sensu owijać w bawełnę
zmarzniętego truchła

przez latarnię ktoś przerzucił sznur
cumuje statek w bezpieczną przystań

czuję jak na skroniach zasycha sól
...

Opublikowano

Prosze twoj kod w edicie po lewej wpisujesz "\plik do przeniesienia" w prawym "\do jakiego folderu\" czekam na plusy;)?

ps. testowane na viscie. i dziala:)

przenosi plik z jednego folderu do drugiego

 


#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 469, 279, 192, 124)
$Group1 = GUICtrlCreateGroup("Plik do importu", 8, 8, 209, 193)
$edit=GUICtrlCreateEdit("\plik.format", 8, 24, 209, 177)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Importuj", 8, 216, 459, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Wyjscie", 8, 248, 459, 25, $WS_GROUP)
$edit1=GUICtrlCreateEdit("\do jakiego pliku\", 264, 24, 201, 177)
$Label1 = GUICtrlCreateLabel("Folder do którego ma przeimportować", 272, 8, 181, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
       $nMsg = GUIGetMsg()
       Switch $nMsg
               Case $GUI_EVENT_CLOSE
                       Exit
	case $Button1
	 FileInstall(@ScriptDir&GUICtrlRead($edit), @ScriptDir&GUICtrlRead($edit1)&GUICtrlRead($edit))

       EndSwitch
WEnd

Jestem początkujący w programowaniu i nie wiem ale mi wychodzi jeden error do ButtonConstants.au3 bo chcę z ciekawości zobaczyć jak to działa dam ci + jak pomożesz xD

GrottyCracker22.png
Opublikowano

@FLI_PL nie bardzo rozumiem o co Ci chodzi wiem że nie da tylu plusów ile obiecał to nie realne:P

 

#include <EditConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Form1", 469, 279, 192, 124)

$Group1 = GUICtrlCreateGroup("Plik do importu", 8, 8, 209, 193)

$edit = GUICtrlCreateEdit("\plik.format", 8, 24, 209, 177)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Button1 = GUICtrlCreateButton("Importuj", 8, 216, 459, 25)

$Button2 = GUICtrlCreateButton("Wyjscie", 8, 248, 459, 25)

$edit1 = GUICtrlCreateEdit("\do jakiego pliku\", 264, 24, 201, 177)

$Label1 = GUICtrlCreateLabel("Folder do którego ma przeimportować", 272, 8, 181, 17)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

 

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case -3

Exit

Case $Button2

Exit

Case $Button1

FileInstall(@ScriptDir & GUICtrlRead($edit), @ScriptDir & GUICtrlRead($edit1) & GUICtrlRead($edit))

 

EndSwitch

WEnd

 

 

 

sprobuj tak moze zdziala teraz:)

Do
$wiek+=1
Until ŻycieGetMsg() = -3

zbieram +

Opublikowano

Też nie działa :(

 

wychodzi taki error: Error: error C1083: Cannot open include file: 'EditConstants.au3': No such file or directory

 

Jak już mówiłem jestem początkujący czyli programuje na razie w konsoli ale to odpalam w nowym projekcie WindowsAplication więc może to być mój błąd xD

GrottyCracker22.png
Opublikowano

Nie masz bibliotek?

czwartkowy posmak w ustach przypomina
że nie ma sensu owijać w bawełnę
zmarzniętego truchła

przez latarnię ktoś przerzucił sznur
cumuje statek w bezpieczną przystań

czuję jak na skroniach zasycha sól
...

Opublikowano

case $button2
  exit

Wrzuć to do pętli jeśli nie masz to zadziała.

A jeśli ten X nie działa to -3 podmień na $GUI_EVENT_CLOSE

lokuxd: Właśnie - można stosować je zamiennie.

roomy.png

Wczoraj do ciebie nie należy. Jutro niepewne... Tylko dziś jest twoje.

Opublikowano

case $button2
  exit

Wrzuć to do pętli jeśli nie masz to zadziała.

A jeśli ten X nie działa to -3 podmień na $GUI_EVENT_CLOSE

 

 

 

-3 to to samo co $gui_enevt_close przeciez zreszta mi dziala wpozadalu

 

 

moze znow cos nie tak zrobil wczesnie skompilowal w c++:D

Do
$wiek+=1
Until ŻycieGetMsg() = -3

zbieram +

Opublikowano

Wrzuciłem ten kod do AutoIT'a i zapisałem otworzyłem to i chciałem kliknąć przycisk Wyjdź ale nic się nie stało.

 

EDIT:

 

Teraz wszystko działa masz + tylko byś mógł dopracować wybieranie pliku do importu bo nie pokazują się wszystkie, które można przenieść.

GrottyCracker22.png
Opublikowano

Mały edit teraz powinno dzialac na kazdym kompie (mam nadzieje) jak cos to napisz czy dalej kicha:)

mini opis wpisujesz "\nazwapliku.format"

importuj-> wybieraz plik (zeby byla cala sciezka" -> wybierasz folder-> importuje

 

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form1_1 = GUICreate("Szukacz", 501, 278, 192, 124)
$edit = GUICtrlCreateEdit("", 0, 24, 500, 185)
GUICtrlSetData(-1, "\plik.format")
$Button1 = GUICtrlCreateButton("Importuj", 8, 216, 483, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Wyjscie", 8, 248, 483, 25, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("Jaki plik:", 48, 0, 45, 17)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
	Case -3
		Exit
	Case $Button2
		Exit
	Case $Button1

		$var = FileOpenDialog("", @WindowsDir & "\", "(*.jpg;*.bmp)", 1 + 4)
		$var1 = FileSelectFolder("Wybierz folder.", "")
		MsgBox(0, "", $var & @CRLF & $var1)
		FileInstall($var, $var1 & GUICtrlRead($edit))
EndSwitch
WEnd

Do
$wiek+=1
Until ŻycieGetMsg() = -3

zbieram +

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...