Nie dawno czytałem o takim czymś jak sprawdzaniu kodu podczas załączenia programu, tzn. że gdy mam załączony program, mogę wpisać coś w memo i nacisnąć jakiś button aby wykonał wpisaną procedurkę, ale za żadne światy nie mogę tego zrozumieć.
Tobie chodzi o hasło czy ukryta forma po wpisaniu "czegoś" w memo? :)
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Memo1: TMemo;
procedure Memo1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit2;
{$R *.dfm}
procedure TForm1.Memo1Change(Sender: TObject);
var haslo:currency;
begin
if not TryStrToCurr(memo1.Text, haslo) // jako że litery to nie cyfry więc jest potrzebne to wykluczenie
then
form2.hide
else
if haslo=123123 // nasze hasło
then // po then wpisujesz co ma robić
form2.show ; // w tym wypadku jak wpiszesz w memo 123123 wyświetli się druga forma
end ;
end.
Chodzi mi o coś takiego, tylko to to akurat w przycisku mam procedurke showmessage
W znaczeniu że jak skompilujesz już program i chcesz zrobić takie coś.
mi się zdaje że będą potrzebne pliki samego delphi w kompilować w to ale jak się mylę to proszę nie karać :(
Widziałem takie coś na przykładzie bota do gry Tibia Tibiabot NG i tak jest coś takiego.. więc jakoś da się to zrobić
http://www.torry.net/pages.php?id=280
Tam jest darmowy Innerfuse Pascal Script 3 v.1.02 zobacz może się nada (ja się tym nie bawiłem więc nie wiem co potrafi)
Tylko mi chodzi żeby takie coś napisać, w sensie taki programik do sprawdzania.
Wie wiem czy rozumiem o co ci chodzi.
Chcesz wykonać procedure którą np. napisze użytkownik? No to masz problem ;).
Tzn. możesz albo napisać własny kompilator Pascala (powodzenia!), albo dołączać do programu jakiś zewnętrzny kompilator i biblioteki do niego łamiąc umowy licencyjne.
Może zadowoliłby cie jakiś język skryptowy - je akurat prościej w ten sposób wykorzystywać?
No, chyba że cię jednak nie rozumiem ;)
Ja też już nie wiem o co chodzi dałem link do interpretera Object Pasala i wg. tego co piszesz wychodzi na to, że właśnie potrzebujesz czegoś takiego ale nawet nie sprawdzając do czego to służy i "co z czym się je" odpisujesz, że chcesz takie coś napisać. No to pytanie co napisać? Swój język skryptowy i jego interpreter?
jemu chodz ze np masz takie coś
!!tytul polecenia!!jakasprocedura(1000)!!if a < b then end!!
I tak 1 podaje tytul procedury, 2 podaje np czas powtarzania tej procedury 3 wykonuje np zamknięce aplikacji jeżeli a jest mniejsze od b. !! - oddzieka składnie.<ort>puzniej </ort>kaje np wykonaj skrypt i program sam interlretuje te składnie i wykonuje je jezeli n jest porawna to wywala błąd.
I jak koledzy wczesniej ja polecam raczej użyć gotowców np skrypty lua, amx (nie wiem czy sie da). <ort>Hyba </ort>że masz dużo czasu albo tych procedur chcesz mało...
Sry za liteeowki ale pisze z telefonu
// literówki - spoko, błędy ortograficzne - stanowcze nie! - Ł
Jakie kompilatory...
mozna to w taki o to prymitywny sposob zalatwic:
Czytasz text z memo i odpowiednio parsujesz.
No i jazda z ifami, jesli napotka 'showmessage' to pobiera argument i wywolue rzeczywistego showmessaga itd. Jesli for, to odpowiednie argumenty dalej sciagasz i wywolujesz rzeczywistego fora..
Generalnietoporna rzecz, trzeba uwzgledniac bloki begin/end itd
prosił bym kod <ort>źrudłowy </ort>tak dla prztkładu...
prztkładu
A mogę wiedzieć, co to jest "prztkład" ? :d
@serviceapp:
Dobrze kombinujesz ;-)
Sam nie raz z nudów tworzyłem takie pseudo-kompilatory. Działały tak jak podałeś.
To by było dobre na początek.
Jak działały to podaj kodzik ;p albo pomóż mi z tym.
potrzebujesz najnormalniejszego w swiecie parsera.
Na moje oko jestes na to za cienki w uszach (nie to, ze ja jestem jakis mega kozak, ale po twoich wypowiedziach wnioskuję, że "to się nie uda") - odpusc sobie to na razie i wroc za kilka lat do tematu.