jak zrobic cos takiego:
if Pos('@@', Edit1.Text) = 1 then
skasowac znaki @@
showmessage(edit1.Text bez znakow @@); <- o taki efekt mi chodzi
<<<<<<<<<<<<<<<<<<
Jak nadac tytul showmessage??
jak zrobic cos takiego:
if Pos('@@', Edit1.Text) = 1 then
skasowac znaki @@
showmessage(edit1.Text bez znakow @@); <- o taki efekt mi chodzi
<<<<<<<<<<<<<<<<<<
Jak nadac tytul showmessage??
var
str : string;
begin
if Pos('@@', Edit1.Text) = 1 then begin
str := Edit1.Text;
delete(str, 1, 2);
Showmessage(str);
end;
end;
//DOPISANE
Nie da się nadać tytułu Showmessagowi, ale możesz użyć MessageBox :
Application.MessageBox('Komunikat','Tytul',MB_OK);
ShowMessage ma taki tytuł jak aplikacja (Application.Title)