1. Reklam


    1. bestsro
      joysro
      anafor
      anafor
      viki
      darkroad
      bosalan

Programs (Programlar) altındaki grupların listesi


  1. Redefine

    Redefine olduser

    Kayıt:
    21 Kasım 2007
    Mesajlar:
    3.040
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    36

    [​IMG]

    lll :idea: lll Programs (Programlar) altındaki grupların listesi lll :idea: lll

    Form üzerine bir tane listbox, bir tane Button ve bir tane de DdeClientConv bileşeni koyun. DdeClientConv bileşeninin DDEService ve DDETopic özelliklerini "Progman" (tırnaklar yok) olarak değiştirin ve aşağıdaki kodu yazın;

    Kod:
    procedure TForm1.Button1Click(Sender: TObject);
    var
      P: PChar;
    begin
      ListBox1.Items.clear;
      P := DDEClientConv1.RequestData('Groups');
      ListBox1.Items.SetText(P);
      StrDispose(P);
    end;
     
  2. Leader

    Leader rank8

    Kayıt:
    18 Ağustos 2007
    Mesajlar:
    4.876
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    36

    Saol Ya Bunu Arıyordum