Jak mam uniknąć runtime error`a?

0

Otoz teraz mam zamiar sie troche rozpisac... Buduje program ktory zaklada haslo na wybrany exe. Zadaniem mojego programu jest wklejenie mojego drugiego exeka do exeka docelowego za pomoca takiego (i wylacznie) kodu:

AssignFile(F,'PS.exe'); // Otwórz p1
Reset(F,1);
BlockRead(F,Bufor,Sizeof(Bufor),R); // Odczytaj jego zawartość
CloseFile(F);
AssignFile(F,Edit1.Text); // otwórz plik blokowany
Reset(F,1);
Seek(f,0); // Przejdź na początek
BlockRead(F,Bufor1,Sizeof(Bufor1),R); // Odczytaj początek
Seek(F,FileSize(F)); // Przejdź na koniec
BlockWrite(F,Bufor1,Sizeof(Bufor1),R); // Zapisz odczytany początek plik
Seek(F,0); // Wróć na początek
BlockWrite(F,Bufor,Sizeof(Bufor),R); // Zapisz program blokujący

Closefile(F); // Zamknij plik

Widać po zalozeniu blokady, ze exe docelowy zwiekszyl swoja objetosc (eureka) natomiast exe nie uruchamia sie... Pojawia sie RUNTIME ERROR 216 at 00042EF2 i na tym staje... Nie wiem czy jest to za sprawa niepelnego kodu ktory wczesniej podalem czy za sprawa powalonego (jesli w ogóle jest powalony - osobno rusza bez problemu) pliku PS.exe
[???]


Prosze o pomoc :-/ z gory dzieki

0

216 odpowiada za odwoływanie sie do poamiędzi niedostepnej dla programu, dalej nie mozna od tak sobie koklejac co sie żywnie podoba do execa, kazdy exec, ma dodatkowo sume kontrolną i aznaczniki odpowiedzialne gdzie co sie w pliku znajduje(PE), a w dosowym jest pokazany start kodu i długosc pliku w paragraphach, wiec takie zabiegi przykro mi ale zawsze nie będa działać

0

skompresuj, Zakoduj plik i kombinuj. To zawsze działa. wystarczy odpowiednie rozszeżenie i skojarzenie i już prog będzie robił to co należy

0

co masz na mysli?

0

co masz na mysli?

No naprzykład kojażysz swój prog z *.ecx (e coded xec) w programie realizujesz dekodowanie i uruchamianie

1 użytkowników online, w tym zalogowanych: 0, gości: 1