Forum: Multimedia
by drama22,
31. Okt 2014
here is full code
procedure mainform.buttonclick(Sender: TObject);
begin
if Length(Trim(textinput.Text)) < 33 then
begin
Application.MessageBox('invalid Youtube link', 'Info!', mb_iconWarning);
end else
if not AnsiStartsStr('http://youtube.com', textinput.Text) then
begin
Forum: Multimedia
by drama22,
31. Okt 2014
i think about that but iam stuck with coding i try somthing like that
if Length(Trim(textinput.Text)) < 33 then
begin
Application.MessageBox('Thats not youtube link', 'Info!', mb_iconWarning);
end else
if AnsiStartsStr('http://youtube.com', textinput.Text) then
begin
Application.MessageBox('Thats not youtube link', 'Info!', mb_iconWarning);
end
Forum: Multimedia
by drama22,
31. Okt 2014
hi, regarding my previews post iam trying to submit youtube links to other form i done with every thing but one thing has left ,, i want to allow only youtube links to be sent like only youtube links can be submitted i try method to force the text input to have more than 33 chars like this
begin
if Length(Trim(Textinput.Text)) < 33 then
begin
Application.MessageBox('Thats not...