將某些剪貼板文本粘貼到CBB 10中的TEdit中

Question

我希望當用戶單擊該按鈕時，僅在Clipboard上包含URL（以http：//開頭）的文本會自動粘貼到TEdit中。

我試過下面的代碼，但根本不起作用。

#include <Clipbrd.hpp> 

void __fastcall TForm1::Button1Click(TObject *Sender) 
{ 
String Text = "http://"; 

    if (Clipboard()->HasFormat(CF_TEXT)) 
    { 
    Edit->Text = ContainsText(Clipboard()->AsText, Text); 
    // Clipboard()->Clear(); 
    } 
} 

Answer 1

ContainsText()返回一個指示bool潛臺詞是否找到或沒有。您正在將該結果直接分配給您的TEdit，而不是使用它來決定是否將剪貼板文本分配給TEdit。

試試這個：

#include <Clipbrd.hpp> 
#include <StrUtils.hpp> 

void __fastcall TForm1::Button1Click(TObject *Sender) 
{ 
    if (Clipboard()->HasFormat(CF_TEXT)) 
    { 
     String CBText = Clipboard()->AsText; 
     if (ContainsText(CBText, "http://")) 
     { 
      Edit->Text = CBText; 
      // Clipboard()->Clear(); 
     } 
    } 
} 

BTW，http://是沒有被廣泛使用的唯一URL方案。至少，也考慮尋找https://以及。