问题列表 - 第22496页

我知道.NET Framework附带了一个图像转换类(System.Drawing.Image.Save方法).

但我需要一个24位(R8G8B8)位图图像转换为16位(X1R5G5B5),我真的得上这种转换不知道,并在BMP头止跌24到16位的变化"工作(因为我们需要转换整个图像数据).

另外我想知道我是否可以控制图像抖动等.

想法？任何形式的帮助将不胜感激.

我正在阅读"Little Schemer"一书,并完成各种功能.一般来说,我最终得到与书籍相同的版本,但不是eqlist ?,这是一个测试两个列表相等的函数.

我已经尝试过测试我的版本,它会传递任何我抛出的东西.然而它与"Little Schemer"版本略有不同,我希望有人对我是否遗漏某些东西持有意见 - 我怀疑是这样的.

我的版本:

(define eqlist?
  (lambda (list1 list2)
    (cond
      ((and (null? list1)(null? list2))#t)
      ((or (null? list1)(null? list2))#f)
      ((and (atom? list1)(atom? list2))(eqan? list1 list2))
      ((or (atom? list1)(atom? list2)) #f)
      (else
        (and(eqlist? (car list1) (car list2))
            (eqlist? (cdr list1) (cdr list2)))))))

这本书的版本:

(define eqlist2? ;This is Little Schemer's version
  (lambda (list1 list2)
    (cond
      ((and (null? list1)(null? list2)) #t)
      ((or (null? list1)(null? list2)) #f)
      ((and (atom? (car list1))(atom? (car list2)))
       (and (eqan? (car list1)(car list2))(eqlist2? (cdr list1)(cdr list2)))) …

我有一个简单的vbscript来检索Windows版本:

Set objWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colVersions = objWMI.ExecQuery("Select * from Win32_OperatingSystem")

For Each objVer in colVersions
   ver = objVer.Version
Next

有可能获得第一条记录,或者我必须遍历集合中的所有记录.我见过的所有例子都是For Each建筑.我尝试时收到预期的语句结束错误:

ver = colVersions[0].Version

看起来返回值ExecQuery不是一个合适的集合.

嗨,我有一个商店程序,我在那里做一个选择查询.我希望通过外部参数来订购.

我发布了一个最小的例子:

CREATE PROCEDURE [dbo].[up_missioni_get_data]
@order VarChar(100)
AS
BEGIN
    -- SET NOCOUNT ON added to prevent extra result sets from
    -- interfering with SELECT statements.
    SET NOCOUNT ON;

    -- Insert statements for procedure here
    SELECT  * from missioni ORDER BY ...
END

我可以按顺序写什么呢？

谢谢

问题:我有一个.NET dll,我在C++程序中使用它.现在我必须在部署计算机上以编程方式注册dll.

我该怎么做(以编程方式!不使用regasm)？我记得,当我曾经用C++ dll调用VB6 dll时,我不得不使用DllRegisterServer和DllUnregisterServer.

使用.NET dll还是这样吗？
看来我必须以某种方式将dllregisterserver函数添加到.NET dll中.

考虑一下Chez Scheme代码的这一点：

（进口（chezscheme））

（定义（list-enumerate ls val proc）
  （让循环（（ls ls）（返回？#f）（val val））
    （如果（或（空？ls）
            返回？）
        值
        （值调用（lambda（）（proc val（car ls）））
          （lambda（返回值）
            （循环（cdr ls）return？val））））））

（定义（list-index ls proc）
  （列表枚举ls
                  0
                  （lambda（i elt）
                    （如果（proc elt）
                        （值#ti）
                        （值#f（+ i 1））））））

（定义n 100000）

（定义数据（iota n））

（时间（列表索引数据（lambda（elt）（= elt（-n 1）））））

运行：

〜$ scheme-脚本〜/ scratch / _list-enumerate-allocation-test-chez-a.sps 
（时间（列表索引数据...））
    没有收藏
    经过3 ms的cpu时间
    实时经过4毫秒
    分配了8个字节

哇，它报告只分配了8个字节。

让我们使用--program选项而不是再次运行它--script：

〜$ scheme-程序〜/ scratch / _list-enumerate-allocation-test-chez-a.sps 
（时间（列表索引数据...））
    没有收藏
    经过3 ms的cpu时间
    实时经过3毫秒
    分配了800000字节

Yikes，分配了800000字节。

有什么区别？

埃德

我有页面控制但没有导航到其他视图.所以请提供解决方案.

    pageControl=[[UIPageControl alloc] initWithFrame:CGRectMake(0,380,320,40)];
    pageControl.backgroundColor=[UIColor clearColor];
    pageControl.userInteractionEnabled =YES;
    [pageControl addTarget:self action:@selector(pageAction:) forControlEvents:UIControlEventValueChanged];

    [pageControl setHighlighted:YES];


-(void)pageAction:(UIPageControl*)control
{       
    [self displayNextPage];
    [self displayPreviousPage];
}

谢谢,Madan Mohan.

如标题中所示,数组的每个元素iv应包含0到255之间的随机数.我尝试过:

char iv[8];
char buf[2];
int i, k;
srand(time(NULL));
for (i = 0; i <8; i++){
     k = rand()%256;
     iv[i] = (char)k;
}

提前致谢.

我想将方法​​返回的数组存储到另一个数组中.我怎样才能做到这一点？

public int[] method(){
    int z[] = {1,2,3,5};
    return z;
}

当我调用此方法时,如何将返回的数组(z)存储到另一个数组中？

这里出了什么问题,即使我之前使用的代码相同,我总会得到一些令人讨厌的错误.但是当我将它应用到其他形式时,它会给我上面的错误.这是我的代码:

Imports System.Data.OleDb
Public Class Updater2
    Public adminID As String
    Public adminName As String
    Public adminPass As String

    Private con As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;Jet OLEDB:Database Password=nrew123$%^;")
    Private com As OleDb.OleDbCommand

    Public Sub New()
        con.Open()
        com = New OleDb.OleDbCommand("Select * from admintable")
        com.Connection = con



    End Sub

    Public Sub updates()
        com.CommandText = "UPDATE admintable SET AdminName = '" & adminName & "', AdminPassS = '" & adminPass & "' WHERE ID = '" & adminID & "'"
        com.ExecuteNonQuery()

    End Sub
End …